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Now containing the complete QL Toolkit soft ware as well as an easily used Ram-Drive 
device driver, the CST QDisc is the longest established and most widely used floppy disc 
controller for the QL computer. The QDisc interface may be used with virtually any 3.5” 
or 5.25” floppy disc drives including, of course, CST's dual slim-line 720K (1 Megabyte 
unformatted) high performance, 80 track double sided drives. The Toolkit software 
provides a wide range of SuperBASIC commands and functions designed to allow the 
full power of the QL to be realised without resorting to machine code programming, 
giving access to job control, random access I/O, character sets, wild card file handling 
and so on. The Toolkit is included in the QDisc firmware, so it is ready for use as soon as 
the system is switched on, as is the Ram-drive device driver, which allows any unused 
memory to be used as a high speed storage medium, ideal for temporary results, and 
for saving screen images for high speed displays. Naturally the Ram-drive may be used 
to maximum advantage when used on a QL with additional memory such as the RAM- 
plus. 





Expanding the QL's memory from 128K to the maximum 640K, the CST RAM-plus is 
based on the latest 256K DRAMs to give full speed no wait-state operation and is 
housed in an elegant aluminium case which matches the QL and provides an expansion 
port allowing a peripheral interface, such as a QDisc floppy or Winchester controller to 
be plugged in. Adding high speed memory to the QL has several advantages: all QL 
programs run faster, including ones that make heavy use of disc or microdrive as QDos 
uses spare memory for buffering data; increased data space is available for 
SuperBASIC, Psion and other application packages and the QL's multitasking ability is 
greatly enhanced by the ability to load several large programs simultaneously. The 
extra memory can also be used to advantage with the Ram-drive firmware supplied 
with the QDisc. For customers who have already purchased an earlier QDisc controller, 
the Ram-drive software can be supplied on floppy disc at a small charge. 


The flagship of the CST fleet of storage devices for the QL is the 20 Megabyte 
Winchester drive with integral floppy drive. The system is housed in a compact metal 
case with integral power supply and is interfaced to the QL by a small controller card. 
The floppy specification is the same as the standard QDisc; the Winchester is a high 
performance drive unit based on the new SCSI standard, which allows up to eight drives 
to be connected to one QL (available to special order). The Winchester firmware is fully 
compatible with standard microdrive and floppy QDos drivers, and also supports 
heirarchical directories and file date stamping. The directory structure allows files to be 
separated into compartments; for example, programs can be held in one directory 
while data for various projects can be held in other directories. This is essential when a 
disc can hold over 1000 files! Date stamping of files is used to keep a record of the last 
time every file on the Winchester was accessed, modified or backed up. This allows the 
Data Management Utility supplied with the system to archive only those files which 
have been changed since the last backup was performed. This greatly reduces the time 
taken to perform regular backups. 


Cambridge Systems Technology 
24 Green Street, Stevenage, Herts SG1 3DS 
Telephone: Stevenage (0438) 352150 




















Please supply the following items: Name 
|QDisc Interface including ram drive (3.5”) =79.95 || Address 
QDisc Interface including ram drive (5.25") £79.95 
Dual 720K 3.5” Floppy Disc Drives: £219.95 
RAM-plus 512K Memory Expansion: £139.95 
QDisc + Dual Floppy Drive: £275.00 
QDisc + RAM-plus + Dual Floppy Drive: £405.00 
20Mb Winchester with floppy: £1150.00 | Post Code _____________ Telephone 
20Mb Winchester, floppy + RAM-plus: £1280.00 
Q488 IEEE GPIB interface: po04 3s qe close G.cheque/FO tor 
QEP-IIl Eprom Programmer: £115.00 | Please deduct my Access/Mastercard/Eurocard/Diners Club a/c 
Utility disc including ram drive (3.5"): £10.00 Card 
Utility disc including ram drive (5.25"): £10.00 ard No. 


Information on: 





Expiry Date 
Prices are inclusive of VAT, postage and packaging in the UK only Sj 
CST reserve the right to alter prices and specifications without prior notice ignature 
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es We take an in-depth look at the MIDI 
July 1985 ee 
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August 1985 onwards it work? Can you build your own? All 
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QL Comms. 
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NEW TALENT RELEASES! 


Get the most from your QL with these latest TALENT programs — a CAD 
package for professional designers, an Assembler/Disassembler for machine 
code programmers and an addictive arcade game for everybody! 


A two-dimensional CAD package suitable for all general, | 
scientific and engineering applications. Create accurate, 
finely detailed plans, diagrams or designs and print 


them out to any width on your Epson printer. _. 
You'll find TECHNIQL S by Eddy Yeung 
A complete set of tools — everything you need to write, 


extremely easy to use 
and capable of edit and debug programs written in Assembly code. 
Compact, elegantly designed and easy to use. 


producing top- 
Three main program modules: 


quality professional 
results. 

@ FULL SCREEN EDITOR 

@ ASSEMBLER 
@ MONITOR & DISASSEMBLER 















Features: 
* Full User Guide and 
Reference Manual 

provided on master 


cartridge The Editor can operate on RAM or disk files. Assembly 
* Menu or keyboard | programs can be edited, assembled, executed and 
‘ = aie dsaeibaitishtarcertharesciee debugged in memory with no microdrive access. The 
es Tanai enaeout Editor is also suitable for programs in other languages 
* Compressed storage of designs (e.g. SUPERBASIC) 
* Complete library of drawing tools — lines, circles, The Assembler can operate in a conventional two-pass 

banbe, alipene paraons, curves mode or as a one-line assembler. 
* Two screen modes ae 
* Relocatable code (compatible with disc & extra RAM) The Monitor offers a useful dual screen to assist in 
* Up to 75 cells can be created debugging graphics programs. 
* Cells can be edited, mirrored, rotated, scaled, 

‘ positioned accurately in other cells. “‘Talent is on to yet another winner..... zed 

* Grid and grid snap Popular Computing Weekly 
* Up to 8 layers per design : 
* Text can be included 
% FAST multi-width printer output £24.95 (+ 50p postage and packing) 


Suitable for: Flow charts, electrical designs, mechanical 
drawings, letterheads/logos, architectural drawings. 


£49.95 (+ 50p postage and packing) 


COMPARISON WITH OTHER PRODUCTS 





Don’t forget Talent’s 
by Stefan Kuhne CARTRIDGE BIO] on ge) = 4 
An exciting, fast, addictive game for all ages. Find the fabulous OF- Tamm AOU RE-jace)ge mm (om ol-a Uline) ei an) ag 


treasure of the Lost Pharaoh — and live to tell the tale. €14.95 (+ 50p postage and ey (on.diare)) 
Deep beneath the desert sands, a vast labyrinth of underground 


passages leads to the sealed burial chamber of the Pharaoh. N eee 
Many foolhardy robbers and archaelogists have tried to reach it — Fr Gilg me A v, =) sea 
Computer Systems, 


but all have perished miserably. LEN 
: FREEPOST, Glasgow E 


Can you succeed where they have failed? Armed only with your i = | 7, » 
and find the hidden keys. But beware of monsters ...... ! COMPUTER SYSTEMS G4 OBR. 


trusty blunderbuss, you must explore the ancient passageways 
a Tel: 041-552 2128 a 
* Over 100 screens Please send me TECHNIQL, (] ASSEMBLER WORKBENCH, [] 
* Joystick or keyboard i THE LOST PHARAOH, [] CARTRIDGE DOCTOR. L] | 
controlled | enclose a cheque for .................... Please debit my Access/Visa account 
+ No intelligence required PCCP) LETT Ein ate 
Boi Wame;-* {3s > 2 eee See 7 
1 4 6 95 Address r 
(+ 50p postage and P. Code Sicnature: tls =e 


packing) Se oe mn eee ee ae a ee 





me ee 
Return completed 
form to Talent q 
























Sinclair agrees to Sale of Microdrives 


Sinclair Research has finally reached 
agreement with Microdrive 
manufacturer Ablex which should free 
the future supply of blank cartridges. 

In the Amstrad deal, Sinclair 
retained ownership of Microdrive 
rights but has been reluctant to 
license their production. Ablex is 
under licence to produce Microdrives 
containing only pre-recorded 
software. 

The deal is being described by 
Sinclair as an interim agreement. It 
covers only present stocks of 
cartridges held by Ablex which, with 
demand running at more than 50,000 
a month, it is estimated will last for 


Fast utility 
from Qflash 


West German software house 
Qflash has released version 3 of its 
RAM disc and toolkit software. Qflash 
claims its RAM disc is 10 times faster 
in operation than competitive 
offerings. | 

In addition to the version 2 features 
— fully-dynamic memory 
management, full software 
compatibility including the Psion 
packages — version 3 provides a 
toolkit of SuperBasic extensions and 
utility programs on a separate 
cartridge. The most notable is 
MDVLOAD, which copies a full 
Microdrive to RAM disc in 7-14 
seconds. 

The software is available direct 
from Qflash and from TK 
Computerware and Eidersoft in the 
U.K., costing £18.95. At the time of 
writing Eidersoft was selling version 
2 without the toolkit for £9.95 as the 
company was still in the process of 
Beta-testing version 3. 

Qflash 

Uwe Fischer, Postbox 102121 
D-200 Hamburg 1 

West Germany 

Tel: 010 040 7650461 


T. K. Computerware 
Tel: 0303 64039 


Eidersoft 
Tel: 0708 852647 








Microdrives, the inside story. 
some three months. 

Bill Nichols, of NMA 
Communications, the Sinclair public 
relations agent, says the purpose of 
the deal is “to end any confusion over 
the security and distribution of future 


supplies. ” 

Negotiations between the two 
companies are continuing with the 
aim of reaching an agreement on 
continued manufacture and 
distribution of Microdrive cartridges. 


New printers from Citizen 


Printer Manufacturer Citizen is adding 
two new models to its range of dot 
matrix printers. The MSP 15E is a 


_136-column, wide-carriage printer, 


similar in specification to the Brother 
M1509 and Epson FX-105. 

Costing £449 the MSP 15E is 
almost identical to Citizen top-of-the- 
range MSP 25 printer but with slightly 
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slower print speeds. In draft mode the 
15E clocks a respectable 160cps, 
falling to 40cps in ‘correspondence’ 
mode. 

The specification includes Epson 
compatibility, full bit image graphics 
capability, optional RS232 interface 
and an 8K buffer. 

At £1,349 the MSP-10E is an 80- 





The new Citizen MSP-15E, 0 to 136 in less than a second. 


Rainbow 
announces 


keyboard 


Yorkshire repair specialist Rainbow 
Digital Repairs has revealed that it is 
working on a new keyboard for the 
QL. Bernard Joyce of Rainbow tells 
Sinclair QL World: 

“lam in the design process at the 
moment. | have a prototype which is 
almost working; all it needs is a few 
alterations to the matrix.” 

The new keyboard will, like the CST 
Thor upgrade, be an IBM clone with 
proper full-travel keys and a 2ft. 
wander lead. it would make the QL 
housing redundant other than as a 
processor and Microdrive box. Joyce 
envisages providing some kind of 
cover to protect the redundant plastic 
surface. 

The keyboard will be manufactured 
by Cherry, a West German company 
which specialises in the production of 
IBM-style keyboards. Rainbow hopes 
to have it available this side of 
Christmas. The cost will be in the 
retion of £60. 


column printer with, in every other 
respect, identical specification. All 

Citizen printers are covered by a two- 
year guarantee. 


Further information from: 
Citizen Europe Ltd 

Wellington House 

4/10 Cowley Road 

Uxbridge, Middlesex UB8 2XW 
Tel: 0895 72621 


QL is trade-mark of Sinclair research LTD. IBM-AT is trade-mark of IBM INC. 


® Original QL main 
® Sandy Super Q Board with: 


®1 or 2 3.5" drives (1MB) 








TODAY 


(we mean now) 


SANDY can supply you Q-XT 640 a complete, ready to go system 





board 128K 


— 512K RAM 

— Centronics printer port 
— Super toolkit Il 

— Floppy disk controller 


with the following features: 


a = 
_ 


® Full travel keyboard 
IBM-XT style 
® New internal 60 W 
switching power supply 
® 3 Expansion slots 


£.654(1 drive system) 
£. 699 (2 drive system) 


The above can also be supplied in kit form, to upgrade your existing QL as follows: 
Box, keyboard and power supply (suitable for any disk controller, memory expansion card and 3.5" floppy disk 
drive), no soldering required, fitted in seconds. £959 


The usual range of SANDY quality products is also available. 


| 
| 
| 
| 


SUPERQBOARD 
CONTENTS 


FLOPPY DISK DRIVER 

RAM DISK DRIVER (UP TO 512 K) 
PARALLEL PRINTER PORT 
SUPERBASIC EXTENSIONS 


SOFTWARE DESIGNED BY TONY TEBBY 
(THE AUTHOR OF Q-DOS) CONTAINS 
THE FOLLOWING ADDITIONAL COMMANDS 


“SPL SPL_USE - File spooler 


JOBS AJOBS SPJOB RJOB - Job Control 

GET BGETPUT BPUT FPOS - Direct Access Files 
FLEN FTYP FDAT - File Enquiry Functions 

FOPEN FOP_IN FOP NEW FOP_OVER FOP_DIR 
VIEW - Examining a file 
WDIR WSTAT WDEL WDEL_F - Wild Card Commands 
STAT - Drive Statistics 

WCOPY - Wild Card Copy 

RENAME TRUNCATE 

DATA_USE - Default Directory 

CLOCK - Resident Clock 

EXTRAS - Listing Extensions 

FLP_SEC-security level 

FLP_START-start-up time 

FLP_TRACK-nr of tracks 


POST TO: SANDY (UK) P.C.P. LTD, 93 CHILTERN AVE, BEDFORD MK41 9EH PHONE (0234) 219814 


FLP_USE-microdrive emulation FLOPPY DISK DRIVE 

RAM_USE mdv - microdrive emulation 

PAR_USE ser - serial emulation and many others... TECHNICAL CHARACTERISTICS 
512K £. 249 

256K £.214 FLOPPY DISK: 3.5"° HIGH QUALITY SLIM LINE TYPE 
WITHOUT RAM £.135 MEMORY CAPACITY UNFORMATTED: 1000 KBytes 
UPGRADE O TO 256K £. 84 MEMORY CAPACITY FORMATTED: 720 KBytes 
UPGRADE O TO 512K £.119 NUMBER OF TRACKS: 160 (2 x 80) 

UPGRADE 256 TO 512K £. 45 AVERAGE ACCESS TIME: 86 ms inc. SETTLING TIME 


AVERAGE LATENCY TIME: 100 mS 
SETTLING TIME: 15 mS MAXIMUM 
TRACK TO TRACK: 3 mS MAXIMUM 


THRU-CON RAM CARDS MOTOR STARTING TIME: 250 mS MAXIMUM 
ROTATION SPEED: 300 RPM 
— THE ONLY RAM CARD WITH THRU CONNECTOR TRACK DENSITY: 135 TPI 
OF SUCH COMPACT DIMENSIONS: 72 x 100 mm. RECORDING DENSITY: 8718 BITS per inch. 
FITS COMPLETELY INSIDE QL INTERNAL POWER SUPPLY. 
— TWO VERSIONS - 256 K AND 512 K (YOUR QL MEMORY Single £.125 
GROWS TO 384 K AND 640 K RESPECTIVELY). Double £. 200 
— 256 K VERSION EASILY UPGRADEABLE TO 512 K 
IN SECONDS ! 


— D-RAM CHIPS FOR FAST ACCESS TIME (150 nS) 
— NO WAIT STATE OPERATION - UP TO 30% FASTER THAN 


OTHER MEMORY EXAPANSIONS 
— COMPATIBLE WITH ALMOST ALL MAKES OF FLOPPY DISK SPECIAL OFFERS 

INTERFACE (PLS. INQUIRE) 
— FLOPPY DISK INTERFACE COVER (FREE) Super Q board 512K with double 3.5" drive 1 MB... £.449 
512K £.120 Ram disk software ........222-ssceeeseeeeeeeenenes £. 6.99 
256K £. 80 Datalife 3.5" disk DS DD 10 for .............-..00- £. 28 
UPGRADE 256 TO 512K £. 40 


—— es ones — — — —-— —_———. ——- a a Ce ienanedl es = —_——— ors ae —_ — —_— os ——-- 


MADE PAYABLE TO SANDY (UK) P.C.P. LTD. 
NAME 





TO ORDER PLEASE PHONE (0234) 219814 OR COMPLETE AND POST THIS COUPON 


| ENCLOSE CHEQUE/POSTAL ORDER FOR £ 


PREXES RCS fa arpa Sey es ct teh As a Patan Se ee | 
PRICES INCLUDE VAT, POST AND PACKING DESPATCH WITHIN 14 DAYS OR MONEY BACK 


@) Mica isctelMastela Motmstiata elim acti-volccam MNO ME|:1\,07-W Mtn cele[-eateTs ares a1: 7, TN ae 


_ TOMORROW 


a (CE nearer than you thi nk) 


SANDY technology offers you this... 


HARDWARE 
MC68000 8 MHz MPU 


128 kbytes exchangeable system NOI 


512 kbytes to 8 Mbytes RAM 

two external ROMPer connectors 
two internal ROMPer connectors 
(ROMPer / RAM bus) 

complete bus connector 

©] erol si oxonileli-melhyellonmecolaice)i(-1s 
Adem itll melt] o)(-s-emlatel-1eX-tale claim ofelle 
rate serial ports 

MIDI output port 

©] Morey any oXehilol(-mal-ia ola aninlxolele]aim clolar 
fefelneli-im exe) a 

aalolehi-m elo) al 

sound generator 7 


, up to three 3%" floppy disk drives or 


olal-Mc sam tel ne Melly ate lahi-Melalo me] ol ce) 
two floppy disk drives 

oXoh Ac-1 ava elolel <-toMa-te] im tlan\-Mel lolol 
Taliciaatel Mm aele. 





KEYBOARD 


89 key IBM AT style keyboard 
Nh OlG GD 
joystick port 


SOFTWARE 


QDOS compatible operating system 
extended window handling 

pull down and static menu handling 
integrated pointer environment 
improved error reporting 


SuperBASIC compatible programming 


Kolate[Ulolet-Mretii-at-¢-lel i ifole 

all Supertoolkit facilities 

mlola «SM ailelex- Me lah’Z-laMlaliclareles 
file manager 

Lyefele) (1g 

job manager 


TONY TEBBY DESIGN 


Send a suggested name for this new machine and we will award a free computer 
to the FIRST best suggestion we receive. Don’t forget your name and address. 


oltre BVColUa | < Bro el-Bial-Bal ee PM olgolile Re) dal-\g of this new amazing machine? 
ola vela my Vy 1d MCS) OU col miilela-Mel- ell Ce | 


SANDY (UK) P.C.P. LTD, 93 CHILTERN AVE, BEDFORD MK41 9EH PHONE (0234) 219814 





QL SURGERY 


The Sinclair QL World guide to curing a sick micro. 


large parcel 
arrived in the 
QL World offices 
along with the 
=arest of the morn- 
ing post. As usual, we were 
eager to unwrap it and dis- 
cover what exciting new 
piece of hardware had been 
sent for review. 

It transpired that the par- 
cel contained a QL — anda 
damaged one at that. There 
was an anonymous letter 
enclosed which described 
the fault briefly -— the 
machine would crash after 
about five minutes’ use. The 
most astonishing thing was 
that the owner had not sent 
the machine in the vain hope 
that we might be able to 
repair it but was making us 
a gift. 

While things are not so 
bad that the only thing to be 
done with a dead QL is to 








give it away, it must be said’ 


that the process of putting a 
sick machine back on its feet 
is less than straightforward. 

Those with the least prob- 
lems are obviously QL own- 
ers whose machines are still 
covered by the 12-month 
warranty. Despite the fact 
that the Sinclair micro- 
computer business was sold 
to Amstrad in April, the war- 
ranty is still valid, even if you 
bought your machine before 
the takeover. Amstrad is 


obliged, in law, to honour the 
guarantee. 






The question is what do 
you do to ensure the 
speediest, cheapest and 
most reliable repair? For 
Owners of guaranteed 
machines there is only one 
option, unless you want to 
pay for the repair and that is 
to return it to the dealer from 
which it was bought. If you 


8 


have not had the machine 
for more than a few weeks, 
most dealers will replace it 
wih a new model 
immediately. If the machine 
was faulty at the time you 
bought it the dealer must 
refund your money, though 
most people would be satis- 
fied with a working replace- 
ment. 

If you have had the machine 
for some time, though, it 
would be unreasonable to 
expect a new replacement. 
Under the Amstrad warranty 
scheme, the dealer sends 
your QL to a repair contrac- 
tor — probably Computafix. 
It repairs the machine and 
returns it to the dealer, from 
whom you can collect it free. 






Where owners of guaran- 
teed machines suffer is with 
the time it takes top effect 
repairs. Most of the repair 
companies included in our 
survey quoted turnround 
times of between 24 hours 
and three days, whereas for 
guaranteed machines it is 
more like four or five weeks. 

Boots told us that there 
was a six to seven weeks 
wait and if you bought your 
QL from Dixons you could 
be without it for as long as 
eight weeks if a fault de- 
velops. If you cannot afford 
to be without your machine 
for so long it might be worth 
considering paying for a 
more speedy repair. 

There are laws which gov- 
ern such things and if you 
QL breaks down there is 
every chance that the war- 
ranty period will have 
expired. In some ways, de- 
Spite having to pay for the 
repair, you re in a better 
position than you might 
think. You can at least seek 
the quickest, cheapest and 
most reliable repair and 


many dealers offer extra ser- 
vices you would not get with 
a guarantee repair. 

The quick reference guide 
shows at a glance which 
companies perform QL 
repairs, how much_ they 
charge, how long it takes 
and gives a few other perti- 
nent details. 

Wherever you send the 
machine there are a few 
points 
First, if you can find a local 








© 
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worth observing. ° 


repair centre and take your 
machine personally you will 
obviously get it back much 
more quickly than if you trust 
it to the post; some places 
even offer a while-you-wait 
service for certain 
straightforward repairs. 

If you must send you QL 
by post, there is no point in 
sending it by Recorded 
Delivery as there is no real 
advantage to be gained. For 
ordinary parcel post, provid- 


In bygone days, when 
computers were made of 
wired keyboards and any 
number of discrete boards, 
fault-finding was a little 
easier for the layman. If a 
faulty board could be found 
it could be removed and 
replaced, a relatively 
inexpensive job. 


The QL has a membrane 
keyboard, internally, and 
only one board. The 
memory chips are soldred- 
in, usually, and the 
Microdrive mechanism is 
part of the moulded case. 
The Microdrive recording 
heads are not adjustable. 


Those are, of course, 
some of the features which 
permit such a powerful 
machine to be sold at such 
low cost, so we can hardly 
complain. 


That implies that fault- 
finding and repair work by 
the knowledgable owner is 
a little more difficult. One 
big handicap is that no 
circuit diagram is supplied 
as standard. I would suggest 
that unless you have a good 
deal of experience of repair 
work, a QL service manual 
and a very friendly custom 
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ing you have obtained a free 
Certificate of Posting, the 
Post Office will pay compen- 
sation for loss or damage of 
up to £18. 

The best choice is to send 
the QL as a Compensation 
Fee parcel. That will cost an 
extra 70 pence but your 
goods are covered to the 
value of £350. Registered 
Mail provides similar cover. 

There are a number of 
things you can do to ensure 
that your QL is returned to 
“you in working order as 
quickly as possible. Some of 
the companies listed will give 
an estimate by telephone if 
you can provide them with 
a good idea of what has 
gone wrong. 

The fault-finding guide 
should provide you with a 
reasonable idea of exactly 
where the problem lies. If 
you telephone the repair 


TROUBLE 


chip supplier, you would do 
well not to attempt to repair 
the QL. 

You may feel more 
confident about a 
commercial repair and be 
able to obtain a quotation on 
the cost of repair, if you 
could be specific about the 
fault. If a Microdrive is not 
working properly, in what 
way(s) is it not working? If 
the QL keeps locking-up, is 
there a good reason? By 









Fault 

Green/white screen on power-up 
or re-set 

Large blocks/stripes of colour 
and possible speaker noise. 

No re-set or spurious re-sets 
occurring. 

QL locks-up after specified 

time. 


QL locks-up at random. 


Microdrives fail to read/write 
properly ona cartridge in use 
in one drive only. 

Microdrive fails to read 
cartridges recorded on by 
other drive. 

Microdrive fails to read/write 
any Cartridge. 


Certain keys—not usually the 
complete set — fail to operate. 





centre and_~ provide that 
information most of them will 
be ready to provide you with 
an on-th-spot estimate. You 
can then send your QL, 
together with a cheque, and 
the repaired machine will be 
despatched as soon as it is 
ready. 





It is worth noting the 


method by which repair 
companies return machines. 
Nearly all will send them by 
first class insured post but 
some offer the option of col- 
lection and return by courier. 
That will obviously have to 
be paid for but the saving in 
time may be worth it. 

lf you cannot afford to be 
without your QL for so much 
as a minute it may be worth 
considering taking advan- 
tage of one of the schemes 
which offer a replacement 


looking carefully at the 
options you may save 
yourself a repair bill. Let us 
consider a number of 
common areas of fault in the 
QL. The table lists faults 
against possible causes. The 
list of numbers relates to the 
action(s) you can take either 
to cure the fault or check 


machine while yours is being 
repaired. Alternatively, it may 
even be worth keeping a 
spare machine for such 
eventualities. 

We list all the companies 
we contacted which carry- 
out QL repairs. The inform- 
ation provided should give a 
good idea of which best 
suits your needs. Bear in 
mind when choosing a re- 
pairer that cost is not every- 
thing. Also those who quote 
a 24-hour turnround may 
not be able to honour it if 
certain parts are unavailable. 
It is always best to telephone 
beforehand and check. 

Eidersoft charges ac- 
cording to the complexity of 
the repair. Prices range from 
£17 for a simple fault to 
slightly less than £40 for a 
really complicated mess. If 
the damage is more exten- 
sive than that — for example 


if you have attempted a RAM 
upgrade and failed — Eider- 
soft would probably not be 
interested. 

As with most of the other 
companies, the usual repair 
undertaken is to the Micro- 
drive or video ULA, or the 
keyboard, and the price for 
that would be around £30. 
For £39.95 you can take ad- 
vantage of the Eidersoft 
Business Support Service. 
That gives you access to the 
telephone hotline — instant 
helo with problems. The 
company will also provide 
subscribers with a replace- 
ment QL while theirs is being 
repaiored. You will, how- 
ever, have to pay for its 
despatch — £10 by post, £18 
by courier. | 

Eidersoft will provide 
breakdown insurance if you 
require it at a cost of £49.95. 
Peripheral repairs are also 


SHOOTING 


1. Remove any expansion module and check operation. If 
fault is cured the expansion module is faulty or requires 
too much power from the QL. 

2. External RAM is faulty. Treat as for 1. 

3. Bad chip in contacts can be checked and cleaned only — 
by removing all posible chips — not ones soldered in — 
from main board. Do not perform this unless confident 
and obey all normal rules regarding static-sensitive 


devices. 





where it lies. The related 
actions are listed after the 
table. 


Cause Check 
Faulty expansion 1,2 
port or RAM. 

Chip or bad chip 3 

pin contact. 

Faulty re-set 4,5 
switch. 
Overheating/ 
bad contacts/ 
noisy mains or 
marginal RAM 
Noisy mians/ 
bad contacts or 
marginal RAM. 
Noisy mains or 6,7 
over-heating 








3,6,7,8 







3.7.8 








Bad alignment 9 










Over-heating/ 3,6,9 
bad pin contacts 

or faulty drive. 

Faulty keyboard 10 





membrane. 
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4. Re-set switch has been damaged by upward pressure 


5. 


while using it. Check state of switch by removing QL lid. 
Power plug connections are weak through too much use. 
Replace or hard-wire power lead. 


. Over-heating. keep away from direct sunlight and other 


heat sources. Do not cover vent holes. Remove expansion 
boards to see if they are drawing too much power from 
the QL. Place small silent fan behind r.h.s. of machine or, 

if confident — and as last resort — remove regulator and 
heatsink to outside of case. 


. Noisy mains supply. Rectified easily by using proprietory 


suppressor plug or module — see advertisements in this 
issue. 


. If QL contains marginal or ‘lossy’ RAM, a full RAM test 


will be needed to check operation of RAM. See next 
month’s technical help column for appropriate program. 


. If Microdrive heads are mis-aligned there is little hope 


of cure except by a complete replacement by a repair 
centre. Check first that your TV/monitor is not near the 
Microdrives as that could have the same effect. 


10. Faulty keyboards are best left to repair centres. 


Note: If you feel that an €xpansion module is drawing too 
much power form the QL, your only hope of cure is to buy 

an expansion box, usually 2-way, which has its own power 
supply. It plugs into the expansion port and expansion 
modules are then plugged into the box. 


undertaken as well as JS 
ROM upgrades. Telephone 
for further details. 

Capital Computers: Al- | 
though Capital Computers 
operates a standard-charge 
system for other machines, 
it does not do so for the QL. 
The reason given was that 
the QL uses ‘more obscure’ 
parts. Capital, therefore, 
take QLs on estimate basis. | 
you telephone when the 
company has looked at the 
QL and you are told how 
much it will cost. That could 
be anywhere between £5 
and £28. 

Capital reckons to have 
your QL back in the post 
within 72 hours of receiving 
it and claims a 24-hour turn- 
round on some jobs. A 
three-month guarantee is 
provided and should you 
need to take advantage of 
it, Capital will refund the 
postage. The Capital 
guarantee is more com- 
prehensive than most in that. 
it covers the complete 
machine, not just replaced. 
parts and labour. 

Computafix was the 
warranty repair agent for 
Sinclair and claims to be the 
biggest home computer 
repair centre in Europe, re- 
pairing some 3,000 
machines a day. It will repair 
your QL in 48 hours and re- 
turn it by insured post. There 
is a standard charge of £ 
no matter what the problem 
and that includes a standard. 
three-month guarantee on 
parts and labour. 


The Computer Repair 
Centre: If you take yuour QL 
to the Centre it will give you 
an on-the-spot estimate. 
which will usually be 
between £25 and £29. 
Otherwise you could post it 
and pay the standard repair 
charge of £29.95. Machines 
are returned in two to three 
days and the work is guaran- 
teed for three months. 

Chromasonic 
Computer Centre: 
Chromasonic says it can re- 
pair about 70 percent of the 
QLs it receives; the other 30 
percent go to a sub-con- 
tractor. The reason is that 
certain parts are difficult to 
obtain — a not uncommon 
complaint. Major compo- 


10 


nent supplier CPC, however, 
said that parts present no 
difficulty. 

It seems more likely the 
problem is one of the delay 
arising from reluctance of 
dealers to stock numbers of 
the more expensive QL 
components and then run- 
ning out. Anyway, if it can, 
Chromasonic will repair your 
QL for £29.00, including a 
three-month guarantee on 
parts and labour. 

Mancomp: The price for 
repairs in Manchester is £20 
to £40. If you walk through 
the door with a sick QL 





Eidersoft, 

The Office, Hall Farm 
North Ockenden 
Upminster, Essex 


Capital Computers 

Unit K2, Cardiff Workshops 
Lewis Road, East Moors 
Cardiff CF1 5EG 

Tel: 0222 614401 


Computafix 

Orbany Park, Primley Road 
Camberley, Surrey 

Tel: 0276 66266 


Computer Repair Centre 
28 College Street 
Worcs. WR1 2LS 

Tel: 0905 41072 


Chromasonic 
48 Junction Road, Archway 
London N19 5RD 

Tel: 01 263 9493/5 





under your arm, and if Man- 
comp has the parts, it re- 
ckons to have you walking 
in the opposite direction with 
a cured machine inside an 
hour. That must be some- 
thing of a record. 

send it by post and you 
will receive a_ telephoned 
estimate before the com- 
pany carries out the repair. 
If you are in a hurry, refer to 
the trouble-shooting chart 
and tell Mancomp what you 


QL REPAIR 
CENTRES 


RM14 3QH Tel: 0708 852647 


think has gone wrong. You 
will then receive an estimate 
by telephone and you can 
enclose a cheque with the 
machine. That way your 
computer will be 
despatched by insured post 
within 24 hours of receipt. 
Mancomp guarantees all 
work for three months. 
Rainbow Digital 

Repairs: The minimum re- 
pair charge is £17 for a 
keyboard fault. it rises to £30 
for any other electronic 
problem to a maximum of 
£37.50 for Microdrive re- 
placement. All prices include 





Mancomp 

Printworks Lane 
Levershulme 
Manchester M19 3JP 
Tel: 061 224 1888 

















Rainbow Digital Repairs 
Clark House, Haxby 
Yorks. YO3 8HU 

Tel: 0904 768853 


Suredata 

Canons Park, Edgeware 
Middx. HA8 6TQ 

Tel: 01 951 0124 


Videovault 
140 High Street, Glossop 
Tel: 04574 66555 


Quantum 
33 City Arcade 
Coventry, Tel: 0203 24632 


Zedem Computers 
2 Kimbolton Road, Bedford 
MD40 2NR Tel: 0234 213645 


VAT and return insurance 
and postage. Those who 
cannot wait may consider 
paying the extra £15 to have 


the machine collected and. 


returned by courier. 

Rainbow also provides JS 
ROM upgrades. It charges 
for DIY kit and £30 for the 
replacement. 

Suredata has no 
standard charge but, on av- 
erage, repairs cost between 
£25 to £30 including post- 


age, packing and insurance. 
If you telephone and de- 
scribe the fault you will re- 
ceive an estimate. All work 
is guaranteed for three 
months. 

Videovault is another 
Manchester company. 
While it admits to carrying- 
out QL repairs it must be 
said that it seemed less than 
enthusiastic. It said its ability 
to repair a QL depends 
largely on whether it has the 
parts and can trace the fault. 
lf that does not deter you the 
£50 standard charge prob- 
ably will. if Videovault can re- 
pair your machine, it will do 
so the same day and return 
it by insured parcel post. 

Quantum has been in the 
business of repairing Sinclair 
machines for about three 
years. It has a fixed labour 
charge of £12 and parts are 
extra. An everday fault would 
probably cost £20 to £25. 
Quantum can do over-the- 
counter repairs, or the usual 
postal deal in three days. 


Zedem: This Bedford- 
based company has a 
slightly different approach to 
Charges. it quotes a 
standard charge of £24.95 
including postage. Often the 
cost will be less but if it is 
more you will be told before 
continuing. The usual turn- 
round time is two to three 
days but, once again, if parts 
are in short supply it could 
take as many weeks. One 
thing which sets Zedem 
apart from the other repair 
centres is that it offers a six- 
month guarantee on. all 
replaced parts. 

The important thing to 
remember is that getting 
a good deal on repairs is 
like buying anything else 
- it is worth shopping 
around. Telephone com- 
panies before parting 
with your QL, if only to 
check on availability of 
parts. By referring to the 
troubleshooting guide 
and describing the fault, 
you can get a good idea 
‘of cost as well, as ex- 
pediting repair. It is point- 
less being without your 
QL for longer than is 
necessary and the more 
you can reduce waiting 
time the better. 
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DS Enterprises 
(01) 671 0209 


Disks 
5.29" 
Mimic (Recommended) 


3.5” DS DD Disks at only ***** £28. 50 ***** Per Box 


All disks are guaranteed and come packed in plastic flip & file type boxes. 
Drives 


DS DD 


Single 80 Track 
£135.00 


Dual 80 Track 


Lattice C 

Pascal (Full ISO) 

Cash Trader 

Lisp 

Super Charger (Basic Compiler) 
Ram Disc (Ram Disk & Utilities) 
QL User Recommended 
Toolkit Il (Eprom version) 

Ice & Choice 

Sign Designer (Designs Screens & Signs) 
QL User Recommended 
Touch Typist 

Integrated Accounts (Sagesoft) 


Add On’s 


512k Expanderam (Miracle Systems) 

Including Ram Disc 

Dual 3.5” Drive & Interface (Silicon Express) 

C.S.T. Interface 

C.S.T. Plus Expanderam 

As above Plusi Dual 3.5” Drives 

Citizen 120D Printer (Including Leads & Quill Install) 
Astrocom Modem (Ex Brightstar) 

Sandy 512k Super QBoard 


All Prices include Vat and Post & Packing (in UK). Phone for full price list 
or quote on other items, or details of discounts on large orders. 
DS Enterprises 
25 Trinity Rise, London SW2 2QP 
Tel: (01) 671 0209 





APPROVED ‘yu 
for use with 
telecommunication systems 
run by British 
Telecommunications 
in accordance with the 
conditions in the 
instructions for use 



















features. 


Q-CONNECT 


Tandata 


Tandata Marketing Limited 


Albert Road North, Malvern, Worcs. WR14 2LT. 
Telephone: 06845 68421. Telex: 337617 Tandat G. 


Prestel °799# Telecom Gold 81: TANOO1 
A subsidiary of Tandata Holdings plc. 
Prestel is a registered trade mark of British Telecommunications plc 


Q-MOD 





Q-CALL 
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The only communications package for the QL. 

The modules are available separately but, by 
using all three as a complete matched system, 
full advantage can be taken of the integrated 


Complete RS 232 output for general 
communications from 75-9600 baud with full 
two way buffering and flow control. Software 
on a micro drive to support all 3 modules 
includes Prestel Viewdata/Videotex and 
VT100 emulation, and many other features. 


Manual dial V23 modem operating at 1200/75 
bps and 1200/1200 half duplex. 


Provides traditional pulse/loop disconnect 
auto-dial and auto answer. 


OLE SO WI WIS NICyAWEI@) NS 


QCODE TERMINAL software 
Features: 
VIEWDATA TERMINAL — for PRESTEL and MICRONET 
x Split baud rate operation (75tx/1200rx) in conjunction with MODAPTOR (see below) 
— necessary for calling PRESTEL. 
* Can handle dynamic frames. 
* Full emulation of colours, mosaics, separated mosaics, etc. 
x Save displayed page to file on microdrive or disk. 
* Save entire session to file on microdrive or disk. 
* Replay, create or edit saved pages whilst off-line. 
*x Transmit a saved file. 
PLUS 
VTS2 (Scrolling terminal) —for use with Bulletin boards, electronic mail services, mainframe 
computers, etc. 
* 80 column (4 colour), or 40 column (8 colour) modes. 
x VT52 control codes, for fancy editors, etc. 
* Additional control codes to set display colours. 
x Alternate keypad emulation. 
* Upload or download text files using standard utilities on host. 
* XON-XOFF protocol. 
PLUS 
* QLto QL file transfer. Any file transferred from disk or microdrive, including executable 
files, Quill documents, etc. 
* Error detecting and correcting protocol. 


QE MOBDAR TOR assess shied ers icccoplatestees Miata ene eae £39.00 
* Links QL to 300/300, 1200/75, 1200/1200 modem. eg WS2000, PRISM 4000 & 2000, 
NIGHTINGALE, DATACHAT, VOYAGER 11. 
* Includes QCODE TERMINAL software. 
* State modem type when ordering if not 25 way connector. 


MODEN 1000 with Modaptor & Software ........csssscsssssereess £59.00 
x The Prism Modem 1000 is a B.T. approved, manual dial modem that operates at 1200/ 
75 full duplex or 1200 baud transmit only. 
* This package provides all the hardware and software you need to connect your QL 
to Micronet, Prestel, BT Gold or any other 1200/75 baud service. it also allows QL 
to QL file transfer at 1200 baud. 


VOYAGER 7 MODEM with Modaptor & Software A 
* This package enables you to use 300 baud full duplex as well as 1200/75 and 1200 
transmit. Manual dial, BT approved. 









































QfLash RAM DISK (while stocks last) .....scssecscsessssecerssesscserserserersecssaceesseeeees 


QCODE 
42 Swinburne Road Abingdon OXON OX14 2HD 
Telephone: 0235 28359 (9.00 am — 8.30 pm) 








i CONNECT 0-MoD 
1D 0-CALL NOW ONLY 


“19-99 


Q- ‘COMNEGT AND 
Q-MOD ONLY 


“09:99 


PRIGES INCLUDE VAT Pep 


I'd like to know more about Tandata 
communications for the QL. 



















Name 








Address 

















Tandata Marketing Ltd., 
Albert Road North, Malvern, 
Worcs. WR14 2TL. 


ee | 
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Open Channel 
provides you with 
the opportunity to 
voice your 
Opinions in 
Sinclair QL World. 





Printing Quill 


I am prompted by letters 
from Messrs Yamaguchi, 
Knife and Singer in your July 
issue to write regarding the 
means of controlling printer 
output from Quill, Abacus 
and Archive by use of 
embedded codes. They are 
codes which will appear on 
the screen but before being 
passed to the printer from 
the QL will be translated into 
control codes similar to 
those for bold, underline 
and the like which are 
already part of the programs. 
The codes are created by 
use of the abundant 
translates within the 
install_bas program in 
versions 2 and 3 of the 
software. First select a 
character which you are sure 
you will never want to 
appear on paper. All the 
characters with ASCII codes 
greater than 127 and less 
than 182 are good bets in 
this regard. 7 
Enter this character into 


the translate followed by the ~ 


control code which you wish 
it to imitate, which you will - 
find in your printer 
handbook. I have an Epson 
RX-80 F/T so if I enter the 
following into my printer_ 
dat; 

Translate 2: 165,27 
-it translates <CTRL SHIFT 
E> into <ESC>. In the 
Epson, I can therefore get 
enlarged text by typing 
<CTRL SHIFT E> followed 
by <W1>. Text will be 
enlarged until I enter 
<CTRL SHIFT><W0> or 
another suitable translate 
code. 

By the use of these codes 

I have been able to create 
enlarged or condensed, 
italics, elite or pica-sized, 
emphasised or double 
strike. I can also control line 
spacing locally to 1/8in., 
7/72in., n/72in., 1/6in. or 
n/216in. where n is the 
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Write to: 

Open Channel 
Sinclair QL World 
79/80 Petty France 
London 

SW1H 9ED 


number of the code of the 
character immediately 
following the embedded 
code. For instance, <CTRL 
SHIFT: E><3><L> gives 
1/2in. line spacing until 
<CITRLSHIFT E><2>re-sets 
to standard 1/6in: spacing. 

It is also possible to 
call-up the character 
generator which gives 
access to some potentially- 
useful symbols. One word of 
caution, however, is that the 
positioning of the codes on 
the screen can lead to 
disruption of the margins 
and justification of the 
printed text but a small 
amount of trial and error 
will soon correct that. 

Of course, you must 
remember that if you are 
using enlarged text the line 
on the screen may not fit on 
one line of the paper but I 
use enlarged mostly for 
headings which usually fit 
well. 

The use of Quill in my 
work has been greatly 
enhanced by using these 
codes, since I can now 
control line spacing so that 
pre-printed forms with 
awkward spacings can be 
filled in with all my answers 
in the proper place. I also 
find that printing 
spreadsheets from Abacus in 
condensed mode means that 
more of the sheet can be 
fitted-on to the page. 

John McKevitt, Newbury. 


Bug-hunting 


Having broken the rule of 
back-up which, of course, I 
never do, I started to load a 
Quill_doc containing some 
creative work. After a 
minute, up came File i/o 
incomplete which made me 
try to look up what it meant. 

I have yet to find that it 
means anything other than 
that the cartridge is willing 
to keep it listed but, neither 
by loading, merging nor 


copying will it ever let it out 
again. Nothing wrong with 
the tape. Three more bugs: 

One cartridge has a 
random ability to underline 
any entire Quill file. That I 
can side-step by re-loading. 
Sometimes the listing is 
underlined but not the 
mdv2_ heading. Ask for a 
re-listing and this time only 
mdv2_ is underlined. Each 
of those conditions shows 
me whether or nota loading 
will be underlined or not. 

Quill tells my Brother 
HR10 to head every sheet 
with an underlined @. All 
my reading for a remedy 
fails me. 

Recently I have added a 
through port MSL 512K 
Expanderam and wallow in 
piles of memory. This gem 
is adding UHF not screened 
out by any shielding, with 
the result that light snow 
pervades the VDU together 
with raster lines when 
winding some Microdrives. 

At that moment of truth 
when I re-set, the 
milliseconds of the 
remaining display are as 
clear as a new &5 note, 
suggesting that earth or 
grounding is notall it might 
be. Iam not willing to 
suggest it is the MSL plug, as 
there always was a little 
snow. Because of 
practicalities in our 
household, we work on any 
one of three TV sets, not a 
monitor. 

Apart from all that, lama 
very happy QL person. Is 
there any hope with my bugs 
or must I just scratch? 

Roy Myers, 
Northampton. 


The file I/O incomplete error 
usually occurs when you try 
to save a document to a nearly 
full Microdrive. You should be 
able to recover at least part of 
the document by merging. It 
sounds as if you are using the 
wrong printer driver for the 
HR10. 





Readers help 


In the June edition of OL 
World you published my 
letter which requested some 
help in writing a program 
for our rent returns/petty 
cash transactions. I would 
like to thank you for 
publishing it and to say we 
had an overwhelming 
response from readers. 

It is very gratifying to 
know that there are so many 
who are willing to give their 
time and expertise to help 
those who are less fortunate 
than themselves, so perhaps 
you could publish this letter 
as I may have neglected to 
reply to them all. 

We would like to thank all 
those who wrote or 
telephoned with offers of 
help and to say that a 
program is now being 
written for us and should 
soon be in operation. 

The Parkview Society Ltd, 
Torquay. 


Mail order 


My firm has maintained a 
very strong position in the 
mail order market for almost 
four years, by taking great 
pains to give our customers 
cause to trust our service. 
For this reason, I hope that 
readers will feel able to 
accept two points of 
guidance from us. 





First, if you have cause to 
return goods for a refund, 
sending them by recorded 
delivery is a waste of money. 
The Post Office pays 
compensation of up to £18 
in respect of goods lost in 
the ordinary mail, whether 
the package was sent RD or 
not. 


The important point is to 
ask the Post Office for a 
certificate of posting, which 
is issued free. If the goods 
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are then lost, the certificate 
enables you to prove that 
you posted them and, in 
those circumstances, under 
the Mail Order Code of 
Practice of the Advertising 
Standards Authority, the firm 
to which you returned them 
must pay compensation and 
refund your postage costs, 
even though it has not 
received them. 


If it does not, you can 
complain, without charge, to 
the ASA, which can threaten 
to ban that firm’s advertising 
unless it pays. Of course, it 
would be reasonable to 
provide the firm with a 
photocopy of the Certificate 
of Posting, so that it, in turn, 
can chase the Post Office for 
its compensation. 


If the goods are worth 
more than &18, you have 
two choices. You can send 
them as a Compensation 
Free parcel, which is cheap, 
and takes only two working 
days, or as a Registered 
Letter, which is often 
quicker but more expensive. 


The important point is do 
not bother with recorded 
delivery, which gives you no 
additional benefits in these 
circumstances. 

Harry Whitehouse, » 
Newark. 





8056 printers 


I bought a QL from Dixons 
with a 8056 serial printer. As 
many of your readers will 
have this combination, I 
would like to offer some 
information and advice to 
users. Install as: 

PORT: ser1 

BAUD RATE: 1200 

PARITY: NONE 
LINES/PAGE: 66 
CHARACTERS/LINE: 80 
CONTINOUS FORMS: NO 
END OF LINE CODE: CR, LF 
PREAMBLE CODE: CAN 


eitiuelaitas 


I am a research student 
working in dynamical 
astronomy at Liverpool 
University and so I was 
particularly interested to 
read the final instalment of 
John Dice’s series on 
astrology on the QL. My first 
reaction was to dismiss the 
series as just more 
superstitious nonsense but, 
putting aside my 
astronomer’s prejudice, I 
have to say that this 
instalment was very 
informed and lucid. I would 
like to adda few remarks on 
my Own. 

First, as Dice makes clear, 


_ the mathematics of planetary 


motion is very complex but 
numeric integration is not 
the simple alternative he 
suggests. The theory and 
practice of numeric 
integration has been the 
subject of many textbooks 
on astronomy and it should 
not be approached in the 
light spirit which 
characterises Dice’s account 
of it. To say that an 
integration covering one 
million years of outer planet 
positions will take a week on 
a QL begs the question of 
how to write such an 
efficient integration program 
in the first place. 


POSTAMBLE: NONE 
BOLD ON: 27,87,1 or 16,57,1 
or ESC,W,SOH 
BOLD OFF: 27,87,1 or 
16,57,0, or ESC, W,NUL 
UNDERLINE ON: 27,45,1 or 
16,2D,1 or ESC,_,SOH 
UNDERLINE OFF: 27,45,0 or 
16,2D,0 or ESC,_,NUL 
SUBSCRIPT ON: NONE 
SUBSCRIPT OFF: NONE | 
SUPERSCRIPT ON: SI 7 
SUPERSCRIPT OFF: DC2 
The preamble code is not 
needed but the one given 
clears the buffer and re-sets 
the printer. 
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That brings me to my 
second comment. Dice 
refers to Astronomical 
Papers for the American 
Ephemeris, volume 22 for 
information on numeric 
integration. Most readers 
will find it difficult, if not 
impossible, to obtain copies 
of APAE unless they have 
access to the libra. y of a 
university or of the Royal 
Astronomical Society. 


A better source of 
information on dynamical 
astronomy at all levels, 
especially with regard to the 
use of computers, is the 
two-volume Astrodynamics 
written by Samuel Herrick 
and published by Van 
Nostrand Reinhold. I would 
recommend the book to 
anybody who wants to know 
more about the mathematics 
of planetary motions. 

Another excellent 
reference is Explanatory 
Supplement to the 
Astronomical Ephemeris 
which is mentioned by Dice 
in his article. I recommend 
that, too, but Iam afraid that 
it is now out of print and so 
it is unobtainable from 
HMSO. Any good library, 
however, should be able to 
obtain a copy on request. 


If you want only the 
positions of the planets in an 


The 8056 is not capable of 
sub/superscript. This 
example uses Quill 
superscript setting to 
generate compressed (136 
char) text. On-screen this is 
smaller and so gives the 
impression of Quill having 
compressed text. It can be 
used for part of the whole of 
a letter and does not use any 
Quill characters. If you 
print all text regularly in 
compressed it may be better 
to use this method: 

TRANSLATE 1 

TRANSLATE 2 


#,SI] 
* GZ 





easy-to-use form the best 
reference is the 
Connatssance des Temps 
which is published annually 
by the Bureau des } 
Longitudes in Paris. It gives 
the co-ordinates in the form 
of Chebyshev series which 
are ideal for use with a 
computer. 

I look forward to seeing 


-more articles like Dice’s 


but perhaps under the 
heading of Astronomy next 
time. 
David Harper, 
Dept. of Applied 
Mathematics and 
Theoretical Physics, 
Liverpool University. 


Progs paucity? 





Why are most of the 
programs featured recently 
in The Progs not being made 
available via Microdrive 
Exchiange? Are you planning 
to bring this service 
up-to-date? 

M.H. Hudson, Matlock. 


There is room only for a 
limited number of programs 
on Microdrive Exchange, so 
we try to include the best. 

Also, authors are given 
the option of inclusion in 
Microdrive Exchange in 
return for a reduced 


_publication fee. 


To turn compressed text 
on type # {hash} and * 
{asterisk} to turn it off. That 
way the text will appear 
normally on screen. 

Although the 8056 can use 
either sheet or roll paper the 
continous form option is set 
to NO. When a page is 
printed it will wait before 
printing the next page. That 
means that the results can be 
checked before the machine 
prints over pages of the 
expensive thermal paper 
incorrectly. 

M Becket, Barnsley. 
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The QL has one of the most powerful Basic dialects available on any small computer, so it is only 


proper that Simclair QL World should have a regular feature devoted to SuperBasic. Whereas The 


Progs will contain whole programs and thre will be other features involving SuperBasic programming, 


this section will concentrate on short, useful SuperBasic routines for incorporation in your programs 


and on good programming technique. 


To start the series, there is a simple but effective technique for writing programs without line numbers. 


hen, switching- 
on the QL, the 
user selects TV 
or monitor 
display mode 
and the computer attempts 
to load a program called 
BOOT on Drive 1. That is 
undoubtedly a useful feature 
but it is not so helpful as it 
might be. A Microdrive 
might contain more than 
one frequently-used 
program but they cannot all 
be called BOOT. 

The routine in listing 
one offers no fewer than six 
Options on starting-up. It is 
not a program in the 
accepted sense and, once 
run, it ceases to exist. The 
advantage is that it is loaded 
very quickly and it uses no 
space in the Basic storage 
area Of RAM. 
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The technique works 
because Qdos saves all files 
in ASCII format and because 
the OL does not care from 
where its instructions come. 
It is possible to save a series 
of commands, without line 
numbers, in a Microdrive 
file. When that file is loaded 
or merged, those commands 
are carried-out as soon as 
they are interpreted by 
SuperBasic and they are 
then lost, just as if the 
command had been entered 
on the keyboard. A file can 
contain a mixture of direct 
commands and proper 
numbered program lines 
and the computer will store 
the program lines correctly 
and carry-out the direct 
commands. 

Unlike most Basics, 
SuperBasic makes minimal 


reference to line numbers. 
They are essential only for 
RESTORE statements, to 
identify user-defined 
procedures internally and to 
differentiate direct 
commands from program 
lines. GOTO and GOSUB 
also need program line 
numbers but they are 
clumsy and superfluous 


198 DEFine PROCedure bootmaker 
118 DELETE mdvi_boot 
128 OPEN_NEW#3,mdvi_boot 
138 PRINT#3; "CLS#2: PRINT#2; 
140 PRINT#3; 
#2; DATES” 
158 PRINT#3; 
160 PRINT#3; 
170 PRINT#3; 
182 PRINT#3; 
198 PRINT#3; 
288 PRINT#S; 
218 PRINT#S3; 
228 PRINT#S3; 
key = 180: EXIT loop” 
238 PRINT#S; "IF key 
248 PRINT#3; “IF key 
250 PRINT#3; “IF key 
268 PRINT#33; "IF key 
276 PRINT#3; “IF key 
288 CLOSE#s 
298 END DEFine bootmaker 


“PRINT#2;3 
“PRINT#23 
"PRINT#23 
“PRINT#23 
“PRINT#23 
“PRINT#23 
“PRINT#2; 


‘Fi LRUN 
“F2 LRUN 
"FS LRUN 
“F4 List 
“FS List 
“ENTER = 


232: 
236: 
248: 
244: 
248: 


DIR 
DIR 


"REPeat loop: key = CODECINKEY$(-1)): 





commands which are best 
ignored. SuperBasic is only 
half a step away from doing 
without line numbers 
altogether and one wonders 
if they were retained only to 
make the listings look 
familiar to Basic 
programmers. 

It is not possible to create 
a file of direct commands 


Listing 1. 


‘Hellosce -- 
“IF DATE < Be8: PRINT#2; 


“Clock not set’: ELSE: PRINT 


“Select:-’" 


mdvi_EDITOR‘’” 

mdv2_BOOT’" 

mdvi_program’” 

mdvi directory‘" 

mdv2 directory’"™ 

Fresh start’" 

IF key > 231 OR 


LRUN mdvi_editor” 
LRUN mdv2_boot" 
LRUN mdv1_program” 


mdvi_” 
mdv2_" 
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and expect it to run in all 
respects like a normal 
program. Each statement 
must be capable of being 
carried-out directly and 
therefore DATA and READ 
statements, user-defined 
procedures and multiple- 
line IF... THEN, REPeat and 
FOR... NEXT structures are 
not allowed. 

Listings one and two show 
how this unusual feature of 
the QL can be put to good 
use. The first is a routine to 
construct a BOOT program 
and the second is a user- 
defined replacement for the 
SuperBasic SAVE command. 

The BOOTMAKER 
procedure — listing one — 
begins by deleting the 
previous BOOT file and 
opening a channel to a new 
BOOT file. The file is filled 
with a series of statements 
before being closed. When 
the completed BOOT 
program is run, the 
computer passes the time of 
day with the user, displays 
the time — or warns that the 
system clock is not set— and 
then offers a menu of 
options. The user can 
choose to load one of three 
programs — see directory 
listings for either Microdrive, 
or start programming witha 
“clean” computer. 

@OeEnote arethe IF. .. 
THEN and REPeat structures. 
Both are of the short, 





KEYWORD 


TO is a versatile and 
surprising little keyword 
with no fewer than seven 
uses. It is used most 
frequently to indicate a 
range of numbers, as in 
these examples: 
FOR X = 1 TO 50 
SELect ON X = 10 TO 22 
LIST 100 TO 199 

It is also found in PRINT 
statements to indent the 
printing of a string. This is 
mentioned briefly but 
incompletely in the User 
Guide. Here are the facts. 
The first two lines below are 
identical in effect, the third 
is rather different: 
PRINT TO 10; “HELLO” 
PRINT FILL$(" ",10); 
“HELLO” 
AT 2,10:PRINT “HELLO” 
































single-line form and are thus 
acceptable to the interpreter. 
Line 140 tests the internal 
clock; if DATE returns a 
number higher than 8e8 
then the clock is assumed to 
be set correctly. DATE is a 
function which counts the 
number of seconds since 
midnight on January 1, 1961; 
800 million seconds equates 
to some time on the evening 
of May 9, 1986 and therefore 
represents a reasonable test 
of whether the clock is set 
correctly or not. 

Once the menu has been 
printed, the routine enters a 
REPeat loop to test the 
keyboard and escapes only if 
a function key or the ENTER 
key is pressed. Function keys 
pressed with ALT, CTRL or 
SHIFT have the same effect 
as ENTER but they could be 
used to increase the number 
of menu choices available. 

The filenames shown in 
lines 230 to 250 will, of 
course, need to be changed 
to represent files which 
exist. Other options worth 
considering are to change 
the window settings, send a 
file to be printed or back-up 
a file —using INPUT to obtain 
a file name. If the routine 
becomes too complicated, it 
might as well be loaded asa 
program. 

Listing two shows a 
replacement for the SAVE 
command. SAVE is not 


The first two lines fill the 
space to the left of the string 
with spaces, whereas the 
third prints directly from the 
position specified in the AT 
command. The difference is 
made obvious by changing 
the STRIP colour or by 
activating the UNDER option. 

Any value can follow TO 
without causing an error but 
the interpreter treats 
irrational values in strange 
ways. Any number equal to 
or less than the current print 
position causes a single 
character space to be 
printed. That is slightly 
annoying at the beginning of 


‘a line, where: 


PRINT TO O; “HELLO” 
prints the string beginning at 
the second character space 
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OF 












DEFine PROCedure STORE 
310 LOCal drive, name$, 
3280 PRINT#@, 
330 INPUT#®@, 
340 FOR drive = 1, 2 
350 file = ‘mdv’ 
36@ DELETE filet 
370 OPEN_NEW#3, 

380 PRINT#3, 
398 PRINT#3, 
40@@ LIST#3, 2 TO 







filet 








420 CLOSERS 
43@ NEXT drive 
PRINT#@, 









particularly friendly because 
it is cumbersome to use, 
especially if previous files 
are deleted and a back-up 
saved on another 
Microdrive. A typical saving 
operation might look like 
this: 
DELETE MDV1_FILE 
SAVE MDV1_FILE 
DELETE MDV2_FILE 
SAVE MDV2_FILE 
a total of 60 keypresses, 
including four ENTERs. 
STORE, then, has the 
following advantages. it 
takes the pain out of 
deleting, saving and 
backing-up program files; it 
provides an on-screen 
prompt during loading and 
it date-stampes the program 
so that you know when you 
last amended it — not bad for 
a 15-line procedure. 
Placing direct commands 
in program files has a 
disadvantage in that there is 
no longer any difference 
between LOAD and LRUN 
and between MERGE and 
MRUN. The example in 


THE 


on the line. Numbers greater 
than the line length force a 
line feed. Fractions are 
rounded to the nearest 


~ whole number. 


TO also appears in COPY 


- statements, LINE commands, 


the turtle graphics TURN to 
command and the dreadful 
GO TO command. With such 
ubiquity it is not surprising 
that the interpreter can 
become a little confused. In 
many cases TO can replace 
a comma with no ill-effect. 
Try this: 
WINDOW 200 TO 100 TO 
30 TO 50 

While it might not 
produce an error, it is 
obvious nonsense. If a 
procedure, however, was 
defined to print a range of 


& drive & *_ 
"“CLS#@: PRINT#@O, “LOADING " 
"41 REMark File saved :- " 


410 PRINT#3; "CLS#@: PRINT#O, °" 


“STORE complete’ 


MONTH 





files 
“STORE current program... 
‘Enter file name >’ 


' name$ 


’ & names 


& names & """ 


® DATES 


& name$ & " LOADED...°" 


45@ END DEFine STORE 








listing two will not run 
automatically when it is 
merged or loaded. To 
overcome that weakness, 
add a direct RUN command 
immediately before the file 
is closed, i.e.: 

415 PRINT #3, ‘RUN’ 


STORE should be 
entered, tested and then 
re-numbered with very large 
line numbers so that it can 
be merged into programs 
being developed without 
over-writing other lines. 
While the procedure could 
be modified to take 
parameters representing 
start and end-line numbers, 
which are optional with the 
SuperBasic SAVE statement, 
itis unlikely that refinement 
would be worth the effort. 


This article has not 
exhausted the uses for 
creating program lines and 
placing direct commands in 
program files. Other 
applications of these 
techniques will be dealt with 
later in the series. 





numbers, like this: 

100 DEFine PROCedure 
WRITE (START, FINISH) 
100 FOR x = START TO 
FINISH: PRINT !X! 

120 END DEFine WRITE 
It could be called with 
either of the following 
statements: 


WRITE 1 TO 50: WRITE 
5,10 

In that example, using TO 
increases the readability of 
the statement. 


Commas and TO are not 
completely interchangeable. 
For example, these 
statements have very 
different effects: 


FOR X = 1 TO 10: PRINT X 
FOR X = 1,10: PRINT X 





STRONG COMPUTER SYSTEMS 


BRYN COTTAGE, PENIEL, CARMARTHEN, DYFED SA32 7DJ. TEL: 0267-231246 


- 128K QL Computer + Hopper + crazy painter 
— 640K QL Computer + Hopper + crazy painter 


- Sinclair Vision QL colour monitor 
—- 128K QL Computer + Vision QL monitor 
_— 640K QL Computer + Vision QL monitor 





All Systems supplied with convert utility and boot menu 


NEW SUPER O-BOARD BY SANDY JUS! £249.00 
g.0 DUAL DRIVES + SUPER O-BUARD .................. £449.00 
MIRACLE SYSTEMS 512K EXPANDERAM. ........:0:..::0c00cscccccceccsseecccseserescees £119.00 
INTERNAL D.IY. 512K RAM BOARD ...............00.  r—=“E £109.00 
INTERNAL SicK RAN FIED BY US... £136.00 
3.5” DUAL DRIVES + CUMANA INTERFACE + RAM DISK .............cccccee £299.00 
3.5+ DUAL DRIVES + INTERFACE + EXPANDERAM OR INTERNAL ......... £409.00 
LOCKUP DISK STORAGE BOX FOR 40 3.5” DISKS 0... cece cere: £14.00 
CLEANING Kit INCARRYING CASE... i‘ ‘(asta £27.00 
10 DS/DD 3.5 DISKS BOXED... £ 30.00 


ALL PRICES INCLUDE VAT + CARRIAGE 


For your QL communications needs — covers all the major inter- 
national FSK modem modes permitted in UK 


300/300 baud CCITT V21 Answer & Originate 
1200/75 baud CCITT V23 main channel 
75/1200 baud CCITT V23 back channel 
1200/1200 baud half duplex packet system 


Auto-dial and Auto-answer 


Centronics interface with 6KB buffer — for serial to centronics 
‘conversion or for printing incoming modem data. 


Comes complete with communications software for the QL — Prestel 
emulation, 40/80 column terminal emulation, text file transfer. N.B. 
software works with expanded QLs. 


Onboard microcomputer ensures correct data exchange with QL 
and provides split baud rates for V23 modem modes. 


The Astracom 1000 is controlled by software commands from 
keyboard or the communications software provided. Automatically 
reports mode and status and has inbuilt help menu. 


Auto-scan feature puts modem in correct mode to respond to 
incoming carrier. 


The Astracom 1000 has its own power supply and can be used with 
any computer that has a serial port, and so will work with a successor 
to your QL. Astracom intend to provide communications software 
for a wide range of computers. 


The Astracom 1000 is 7 inches wide by 8 inches deep and 1.5 inches high. It comes complete with software, manual and serial cable, all for 





PHONE OUR HOTLINE 








Not BT approved, 
BT approval applied for 


FOR DETAILS NOW! 
Tel: 0793 473697 


Astracom, 13 Beechwood Road, Uplands, Swansea SA2 OWL 


Prices include VAT & Carriage 





Astracom 1000 Multistandard Modem £198.95 
Q Term terminal emulation with error correcting file transfer facility £19.95 
Citadel Membership QL bulletin board with free down-loadable software £19.95 


Please make cheques payable to Astracom 
For free data sheet or further information phone 0792 473697 anytime 













series The Unpredictable 
| Micro — February, March, 
April and June, 1986 issues 
— will have had a chance to 
prepare themselves for the new Digital 
Precision blockbuster release, Profes- 
sional Astrologer. Newcomers wishing 
to acquire additional background will 
find reading those reports by John Dice 
and Phil Staniforth worthwhile. 

Fanciful or fashionable notions aside, 
large numbers of respectable groups of 
serious-minded people, scientist and 
layman alike, are examining the validity 
of astrology. Among those are a diver- 
sified range of disciplines whose 
concerns include statistical research, 
vulcanology, geological aspects of 
earthquakes, biology and meteorology, 
to name a tiny sample 






Michel Gauquelin, a noteworthy 
French statistician, in his book Astrology 
and Science, observed from a sample 
of 25,000 births throughout Europe in 
a 20-year period that a significant 
number of individuals had achieved 
prominence in particular professions 
with a common factor — certain planet- 
ary configurations were evident at the 
time of their births which were relevant 
to particular professions, where either 
prominence or notoriety was achieved. 
Encouraged by his findings, he has con- 
tinued, as have others, in an attempt to 
verify or refute his findings, to increase 
his database by a considerable margin. 
An honest astrologer presents his 
craft as if planetary influences, to use 
an anology, were like a tide. Although 
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some influences are stronger than 
others, they, in the final analysis, are 
only influences and not some mysteri- 
Ous and unopposable force. When 
astrologers speak of ‘malefic’ or ‘ruling’, 
they are generally referring to the con- 
ventions observed in astrological nota- 
tion. 

Rather mundane but pertinent 
examples of extra-terrestrial influences 
are often cited as examples of planetary 
effects. From one of those is derived 
the term lunacy. However derisive, it is 
a phenomenon which is often observed. 

Anyone wishing to dispute the validity 
of the astrological process using its 
failures as supportive evidence should 
examine weather reports as viewed in 
a historical perspective. In spite of all 
the expensive technology providing a 
method of prediction for an entirely 
physical phenomenon, its frequency of 
inaccuracy leaves much to be desired. 

The Professional Astrologer has 
evolved from the Super Astrologer 
series of programs; it has been ex- 
panded to provide the most com- 
prehensive system available for any pre- 
sent or foreseeable micro — and most 
of the minis. When up and running the 
rather spartan menu produced by the 
boot gives little indication of the feature- 
packed programs available, which must 
be experienced to be believed. 

The initial options from the first boot 
menu for the complete Professional As- 
trologer package, which is acces- 
sable in modules, are the Astrologer 
program, the Astronomy program, the 
Defaults editor and the Text editor. 


INPREDICTABLE 
Micro 


Who could have foreseen 
that Digital Precision 
would launch an 
enhanced and expanded 
version of Super As- 
trologer on an unsuspect- 
ing universe. Ron Massey 
reviews Professional As- 
trologer. 





Taking each menu item in reverse 
order, this rather good text editor, which 
can also be used for editing any text 
files, is used to alter or produce any of 
the text tables used by the programs 
and from which is gathered the data for 
the interpretations. 

Although both Astrologer and 
Astronomer have their own temporary 
default editors, the Defaults Editor is as 
comprehensive as it is possible to be 
and caters for every conceivable con- 
tingency for permanent alteration of 
default values of the main programs. 

A comprehensive range of printer 
types can be installed for both charac- 
ter, with the facility for printer re-defini- 


tion of each QL character, and graphic 


printing, in single-or double-density for 
either 8-or 9-wire printing heads; 
planetary symbols (glyphs) may be dis- 
played in either red or white; arcs may 
be displayed as either decimal or 
sexagesimal values. 

Pertinent to the Astrologer program, 
users can customise symbol represen- 
tation according to personal or prefer- 
red conventions. Full editing of any of 
the glyphs used customarily in astrol- 
ogy, such as the Planetary, the Signs 
or the Aspect symbols is implemented. — 

Any one of six House systems may 
be installed as the default value dis- 
played in’ the natal charts and can be 
altered temporarily from within the 
Astrologer default editor. Remaining 
within the mainstream of astrological 
practice, | Professional Astrologer 
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includes Placidus, Equalised, Equal 
House, Koch, Regiomantus and Cam- 
panus as its house options. 

Of particular importance to astrolo- 
gers is the calculation of the Aspects. 
The relation of a planet, house or sign 
to other similar features within a natal 
chart; Aspects determine the weights 
and values used in the interpretation of 
any natal chart. 

Traditionally, the proximity of one 
chart feature to another must be within 
a limited range of arc or, as it is more 
generally called, an orb. A conjuction 
configuration, for example, occurs when 
one planet is within plus or minus seven 
degrees of being in direct line with 
another, such as an eclipse. 









From an astrological point of visw, 
the degree of influence attributed to the 
orbs varies a great deal according to 
the type of aspect. Professional 
Astrologer includes a complete set of 
Orb values as defaults. For particular 
applications § concerning _ specific 
requirements, they may be altered to 
other values involving closer or wider 
tolerances and may also be assigned 
particular weighting according to the im- 
portance of the influences. 

In addition, special Orb values may 
be assigned to the first, fourth, seventh 
and tenth Houses, Progression 
Aspects, Transit Aspects and Cross 
comparison Aspects. 

User-modified files employeing § full 
AND/OR search logic may be included 
in the text files. Whenever the highligh- 
ted configurations occur in a natal chart, 
those files will be included in the 
interpretative analysis. A __ typical 
example, the AND/OR logic employed 
may include one or more planets 
occupying particular positions in a natal 
chart and may be configured to include 
the presence of any particular relation- 
ship. 

Output from Professional Astrologer 
may be printed or saved as a text file 
for later import to Quill. At each stage, 
users have the option either of printing 
the contents of a screen or continuing 
to the next option selected at the input 
stage which includes text, graph and 
aspects pages for each of the Radix, 
Progression, Transit or Comparison op- 
tions. 

Print and hard-copy options are dis- 
tinguished by the former being used for 
text printing and the latter for screen 
dumps. Screen dumps may be made 
in either of two formats; slightly faster, 
the proof-dump is graphically uncor- 
rected in that the printed natal chart 
appears as a vertical ellipse; the second 
option corrects screen-to-printer dis- 
crepancies temporarily by stretching the 
screen, which prints the chart as a 
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circle. Although each stage offers the 
option of continuing to the next set of 
calculation representations or printing 
the contents of a screen an additional 
option, at the initial input stage, offers 
the option of Autoprint in text and either 
corrected or uncorrected screen dumps 
at the completion of each screen page. 
Almost eclipsed by the power of 
Astrologer, Professional Astronomer is 
no less packed with features aimed at 
precise observation oof astronomical 
phenomena. 
Astronomical 


calculation options 


available include Horizontal, Ecliptical . 


and three configurations of Equatorial 
projection. 

Astronomer offers the options of 
viewing the eclipse and phases of the 
inner planets — out to Mars —- a 
Planetarium display of both hemis- 
oheres and zenith with a cursor to iden- 
tify any of the planets present and, in 
common with Astrologer, a view of the 
solar system at the selected time and 
location. 

A feature to the view of the solar 
system is the auto-run option, which will 
advance the movement of the planets 
at a daily rate from the time selected. 

Overall, Professional Astrologer is 
extremely efficient in terms of the way 





it utilises the QL memory as well as its 
file space requirements. It would have 
been relatively simple to aim it at 
expanded QLs, utilising disc-based 
storage — but it is available on either 
Microdrive cartridges — four of them — 
or on disc and is entirely compatible with 
128K QLs. Interpretative text files for 
the Aspects, Houses and Signs, which 
may be altered or added to, take up 
some 190K of file space. 

Two comprehensive natal data files, 
in compressed form, are included with 
the package. Before going into more 
detail regarding those files, it might be 
as well to describe the manner in which 
discs save files. 

Each natal file occupies about 65 
bytes. If each of those files were to be 
saved individually, they would occupy 
three sectors — 1,586 bytes — each on 
a disc. That happens because of the 
way discs work; anyone wishing to read 
the reasons for this particular quirk 


should refer to Colin Opie’s series in the 
January to March issues of QL World. 

Astrological interpretation relies heav- 
ily on calculations accuracy of planetary 
positions. In this, Professional As- 
trologer must be rated very highly. The 
five most difficult planets for which too 
calculate positions are the Moon, Jupi- 
ter, Saturn, Uranus and Neptune. 

Testing the Digital Precision claim for 
its accuracy, positions were taken from 
Raphael’s Standard Ephemeris for 
January 1 from a random 47-year selec- 
tion between 1831 and 1974. One of 
the problems encountered by using 
other ephemeris collections is that the 
majority of them have been produced 
in retrospect, while Raphael calculations 
are contemporary. 

One of the peculiar problems as- 
sociated with production of digital data 
is that people usually rely on the figures 
produced by various systems — time 
being one of them — as absolutes. To 
keep everything in perspective, if you 
were to make the smallest pin-hole 
possible in a roof which is 5Oft. above 
a floor, lying on your back the area 
visible through the pin-hole would be 
approximately equal to one second of 
arc. 

Comparison figures support the Digi- 
tal Precision claim to one minute accu- 
racy within this century for all of the 
planets with the exception of the Moon, 
whose position varies between 
maximums of +3’30” to -4’42” of arc. 

With a typical 33 minutes of arc per 
hour movement, the Moon’s physical 
displacement by this discrepancy 
amounts to something in the range of 
plus nine minutes to minus seven mi- 
nutes of time. Very few people would 
be brave enough to place a birth time 
positively within that range of accuracy. 

lf all of the hard-copy options are ac- 
cepted, as supplied Professional As- 
trologer will provide typically a complete 
11-page report for any selected date; if 
all of the options for Transits, Progres- 
sions and Comparisons are printed, re- 
ports would well exceed that. 

Catering for those interested in main- 
stream astrology, Professional As- 
trologer is a one-of-a-kind package. 
Descriptions such as superb, ultimate, 
excellent are barely adequate. Every re- 
quirement for both individual and 
specialised applications such as 
historical research, individual delinea- 
tions, statistical research and many 
others is well provided for. 

In common with Super Astrologer, 
Professional Astrologer is _ super- 
charged, which reduces loading and 
processing time. That this massive 
program is aimed at users of unex- 
panded QLs using entirely Microdrive- 
based systems in entirely to the credit 
of Digital Precision. 
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TROMBFORM LTB, computer Accessories 





o ina Das tse chas de Dl Bcc Mechrthe aot tithe inde cwtheale 


=| 
S MAILING LIST £24.95 


This program will allow you to quickly store 
and retrieve names and addresses from within 
ARCHIVE. Features include single key functions, 
prints address labels, exports files to Quill for 
mailing list; also compatible with our stock- 
contro! file. 


aa 
im) STOCK CONTROL £24.95 


Keeps a complete record of all your stock 
items including retail price, trade price, 
minimum order level, items on order and many 
other features. 


Be QL APPOINTMENT/ 
DIARY £24.95 


Records appointments dates and times, can 
be used as diary dentist, doctors, hairdressers, 
service engineers. Program allows 26 users with 
up to 40 appointments per day. Features 
include search for day, search for next spare 
time, search for client's appointment. print out 
all day appointments and many others. 


QSPELL £19.95 


Spelling checker for Quill supplied with 25000 
words, checks on A4 page in 24 secs, users 
dictionary and auto leams words. 


k PAYROLL £63.25 


Calculates weekly, monthly or 4 weekly payroll 
full tax calculations, coin analysis and 
payment rounding. 








INTEGRATED 
ACCOUNTS £89.95 


This new program from Sinclair will allow you to 
produce full profit and loss account. 


ARCHIVE 


team of programmers are able to write 
programs to your requirements, phone for 
further details. 


@=7 QL KEY DEFINER £9.95 


For those who use Quill or SUPERbasic this 
program is a must allowing you to define up to 
2k on each key i.e. simply press ALT and “S” and 
the program will be saved onto the microdrive 
and overwritten, press “ALT” and “P” to print 
current file, press ALT and “G” to go to top of 
file, ALT and “B” to go to bottom of file, ALT and 
“D” will type in “Dear Sir’. You can type a 
complete paragraph, phrase or letter by 
pressing one key 


In basic pressing F5 will bring back the last line 
typed; you can define keys for EDIT LIST etc. 


QL CALC £9.95 


This program makes use of the QL’s multi tasking 
facility enabling you to press CTRL and any other 
key to give you a full calculator; having used the 
calculator you can return to the current program. 
This program can be used with Quill, Archive, 
Abacus and Easel. Features include mouse type 
operations, keyboard overide, memory and all 
ne standard type features very useful in a busy 
Office. 


TRANSFORM LTD (DEPT. QL ) 
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QL SWITCH 


This program will allow users with extra memory 
to run QUILL, ARCHIVE, ABACUS and EASEL at 
the same time, or two ARCHIVE programs and 
QUILL. Pressing a key will allow you to suspend 
the current program and switch to the new 
program. 


RAM DISC £14.95 


Users with extra memory will with this software be 
able to set up a ram disc: programs can then 
be instantly saved and re-loaded. A printer 

ler is also included to allow you fo print 
whilst still using your Computer. 


£14.95 


if TOOL KIT £9.95 


This program will copy all or selected files, 
delete one or selected files, display file to 
screen, change file file name. format, and print 
multiple copies of Quill files. 


MEMORY EXTENSION 


MEMORY EXTENSIONS 





. £125.00 


QL VISION 
215.00 

PHILIPS 7502 
75.00 


Ex VAT 


ex vat inc vat 
215.00 247.25 
75.00 86.25 


QL Vision 

Philips 7502 black and green 

Connect your Spectrum to 

the QL; Vision Monitor 39.14 45.00 
Please add £5.75 for delivery of monitors. 





10 CARTRIDGES 
17.50 


20 CARTRIDGES 
35.00 


Microdrive Cartridges 
Microdrive storage box with 10 cartridges 
Microdrive storage box with 20 cartridges 


Add £1.00 post 


PRINTERS 


DOT MATRIX Ex VAT Inc VAT 


Seikosha SP1000 179.00 202.40 
Epson LX80 199.00 228.85 
Taxan Kaga 210.00 241.50 


£1.99 
22.45 
39.95 


DAISY WHEEL 


Brother HI10 
Brother HRR15 


282.67 
401.86 


245.80 
349.44 


Please add £5.75 for delivery of printers. 














3%” DISKS 


DOUBLE 
SIDED 
DOUBLE 
DENSITY 
DISKS 


10 FOR £30.00 


QL to Spectrum 
QL RS 232 
Centronics interface 


Centronics interface 

RS 232 lead 

Monochrome monitor lead 
M1009 tractor feed 

LX tractor feed 

2000 sheets of continuous paper 
1000 labels 

Microdrive cartridges 

10 x 31/2” disc 





Ex VAT Inc VAT 


6.00 
10.00 
16.95 


ACCESSORIES 


26.04 
10.00 
5.00 
13.20 
18.00 
11.29 
5.78 
1.73 
26.08 


We also stock a wide range of ribbons, 


daisy wheels etc. 


6.90 
11.50 
19.50 





29.95 
11.50 
5.75 
15.18 
20.70 
12.98 
6.65 
1.99 
30.00 


Please add £3.00 for post and packing of 


paper. &] for labels. 


DISK DRIVES 


Technology Research Delta 
Technology Research Delta 64 
Technology Research Delta 128 
Cumana interface 


720k single 32" drive 
1440k dual 32” drives 


112.60 
152.17 
173.49 
69.48 
121.65 
210.00 


Cumana interface + single drive 191.17 


Cumana interface + dual drive 279.48 


£13.25p 


Holds 40 disks 
Lockable. 
Tinted removable lid 


HOLDS 40 312 DISKS 
Add £1.00 post 


Epson LX80 
199.00 ex vat 


01-658 6350 


Mail order only. 24 West Oak, Beckenham, Kent. BR3 2EZ 


129.00 
175.00 
199.50 

79.90 
139.90 
241.50 
219.85 
321.40 
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In this, the concluding part 
of our Abacus feature, 
Mike James looks at 
techniques of presenting 
information, paying par- 
ticular attention to print- 
ing, booting and export- 
ING. 





=] nthe three earlier parts of this series 
= wehave looked at the way spread- 
- sheets are constructed but that is 
usually only part of a complete 

application. A spreadsheet has to 





aappy information to be of use and that | 


means either printing it out, drawing 
graphs from it or using it in combination 
with other software packages. In the 
final part of Abacus Art we look at 
techniques for presenting information 
and exporting it to other programs. As 
well as these topics, the BOOT program 
is examined with an eye to making 
alterations to the way Abacus is run. 

In principle, printing a spreadsheet is 
easy. All you have to do is use the print 
command F3 P but in practice getting 
the layout you want can be a little more 
difficult. The first thing to check is that 
the printer you are using is installed cor- 
rectly. That is done in exactly the same 
way for all the Psion applications pack- 
ages. From SuperBasic, type Irun 
Mdv1_install_bas; that runs a menu-dri- 
ven program which will allow you to 
specify which printer model you are 
using. The result of the install processes 
is a data file called install_dat which, so 
long as it is present on the same Micro- 
drive cartridge, will be used by Abacus 
to determine what control codes to 
send to the printer. 

Installing a printer driver is important 
but you will find that it does not help 
with many of the format and layout prob- 
lems of printing a spreadsheet. If you 
change the specification of the line or 
page length in the printer driver, Abacus 
will still print your spreadsheet as if you 
were using a standard 80-column 
printer with 66 lines to a page. If you try 
to print-out a 
Abacus will cope by dividing it into seg- 
ments which will fit on a standard A4 
page. 

That is very useful but some printers 
can handle 132 characters to a line, 
which makes it possible to print whole 
spreadsheets in one go. To change the 
way Abacus prints spreadsheets you 
have to use the Design F38 D command. 
That gives you the option of changing 
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large spreadsheet, | 


THE ABACUS 





the printer width, lines per page, line 
spacing and whether or not a form feed 
should be used between pages. If you 
change any of those settings, Abacus 
will lay-out your spreadsheet accord- 
ingly, irrespective of what the printer 
driver says. Some of the other Psion 
applications programs are not so disre- 
garding of the printer driver. 

Although there are no explicit com- 
mands for using sophisticated printer 
features, such as bold, italic or underlin- 
ing, you can make use of them in a 
spreadsheet by using the chr function 
to send the appropriate control codes 
to your printer. If you are using an Epson 
FX-80 printer or a compatible model, 
putting chr(O)+(27)+"E” into a cell will 
switch on bold printing and 
chr(O)+chr(27)+“F” will switch it off. 

You can use that device to make a 
main title — printed-out in bold; the only 
problem is that the cell to the left of the 


pes oe 


es 








4 


title will show on the screen as “E” and 
the one to its left as “F”. While on the 
subject of using the chr() function it is 
worth mentioning that you can see the 
whole of the QL character set by enter- 
ing col=chr(row()) FROM 1 TO 255. 
You cannot really use the chr() 
technique to send initialisation codes to 
the printer because even if you place 
the chr() expression in Al, the top 
border would be printed before the in- 
itialisation codes reached the printer. 
The solution is to use the PREAMBLE 
CODE in the printer driver, and possibly 
the POSTAMBLE CODE to re-set the 
printer after ae the spreadsheet. 
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The PREAMBLE CODE is a sequence 
of codes sent to the printer before any- 
thing Is printed so if you wanted to set 
the printer into a condensed typeface 
before printing extra large spread- 
sheets, specify the necessary codes in 
the PREAMBLE. 

All four Psion packages can import 
and export data using the Microdrives 
as an intermediary. When using Abacus, 
the most common requirement is to see 
a visual Summary of the data. You can 
construct a crude histogram using the 
rept function as explained in part two 
of this series but if you want high-quality 
graphics there is no choice but to export 
the data to Easel. The export command 
is one of the options in the Files com- 
mand-type F3 F E. When you export 
data to Easel, by rows, the section of 
the spreadsheet you export must have 
the following format: 


text lab1 lab2 lab3 lab4 Sig 
data2 data3  data4 a 


data2 dataS  data4 sot 


vari datat 


var2 datat 


The text in the top right-hand corner 
is ignored by Easel but it must be pre- 
sent or the first column of data will be 
ignored in its place. The text in the top 
row, lab1 and so on, is used to label the 
data values. They are used as labels for 
the bars of a bar chart or the segments 
of a pie chart. The data values in the 
second row are treated by Easel as 
values of a single variable called var1 
which the data occupies in the 
spreadsheet, to be graphed. The third 
and subsequent rows are treated as the 
values of other variables to be rep- 
resented in the same graph. If you have 
the following spreadsheet: 


Profits 
year_1985 


1st 2nd: Sra 4th 
300. 200: 500° 300 
200 400° 300 100 


year_1986 
with the text Profits in cell c3 you could 
export it to Easel with the command: 
>export to easel, range c3:g5, by rows, 
to profit. 


Figure 1. 











Figure 2. 
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Notice that the variable names are 
“year_1985” rather than just 1985 be- 
cause Easel variable names have to 
start with a character, not a number. 
Once in Easel you can import this data 
by the command: 
>Files: import from profit 
and that will produce a graph of the 
profits for the four quarters which, after 
alittle editing, can be seen in figure one. 





The main difficulty about using Easel 
with Abacus is that usually you have to 
extract the figures from which you want 
to draw a graph from a larger spread- 
sheet. The easiest way is to make a 
copy of the desired rows or columns in 
an isolated part of the spreadsheet. That 
is a messy process but the only alterna- 
tive is to design the spreadsheet so that 
the part which holds the data intended 
for graphical display is in the form given 
and that usually results in a rather odd- 
looking spreadsheet. 

The amazing thing about using 
Abacus, or any good spreadsheet for 
that matter, is the way that you can 
achieve surprising results with only a 
little ingenuity. Would you believe it is 
possible to use Abacus to draw a two- 
dimensional plot of a function like: 


exp(-)x*+y*) 


p OE eee @ Oe O_O 





of plotting this function in figure two. 


- 
e 


8G 8 $6 es. ¢ o: Su6: tlt tia S 


It is possible and you can see the results 


Once you have the basic principle, plot- 
ting any two-dimensional function is 
simple. The first problem is how to 
generate suitable values for x and y over 
an area of the grid. That is solved by 
using the functions row() and col() 
scaled suitably for the range over which 
you want the function worked out. If you 
enter the function: 
exp(-(abs((row()-8)/8) ‘2+ abs 
((col()-8)/8)2)) 
into cell A1 and then use the Echo com- 
mand to replicate it over the range 
A1:P16 you will see a table of values for 
the function for x and y in the range -1 
Onan 

The next problem is to change this 
table into a shaded plot of the function. 
That can be achieved by first converting 
its result to an integer in the range 1 to 
6 and then using that to select one of 
six plotting characters. As the function 
being plotted varies between O and 1, 
changing the function in A1 to: 
int(5*exp(-(abs((row()-8)/8 2+abs 
((col()-8/8) “2((+1) 
results in a table of numbers between 
1 and 6. Selecting one of six characters 
on the basis of the result in each cell 
can be achieved by use of the index 
function. Remember that the 
index(col,row) function will return the 
contents of the cell in the specified 
column and row. 

lf you set up a table of plotting charac- 
ters of the correct density, say Space, 
-,+,*,O,X, in column S —i.e., column 19 
— then index (19,result of function) will 
return the appropriate plotting charac- 
ter. Thus the function in A1 becomes: 
index(19,int(6*exp(-(abs((row()-8)/8) 
2+abs((col()-8/8) 2))+ 1)) 
With that change all that remains is to 
reduce the width of the columns used 
to display the function to be a single 
character wide using the grid com- 
mand. You can try plotting your own 
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functions using the same technique but 
be warned — if you see a very compli- 
cated function you might have to wait 
a long time for the results. 

Sometimes you need to combine the 


_ information inanumber of spreadsheets 


to produce a single Summary spread- 
sheet. If you maintain a monthly sum- 
mary of profit and loss it is useful to be 
able to combine a year’s worth of such 
spreadsheets to produce a profit-and- 
loss statement for the entire year. You 
can combine a spreadsheet stored on 
Microdrive with one displayed on the 





useful and easy-to-use operation. 

The Abacus program is loaded into 
memory by a SuperBasic program cal- 
led BOOT. The program prints a mes- 
sage that Abacus is about to be loaded, 
sets up an appropriate window and then 
loads Abacus. The BOOT program can 
be modified to carry-out any initialisation 
required before Abacus is run. The 
Abacus date() and time() functions will 
return the correct time only if it has been 
set, using SuperBasic, before Abacus 
is run and it is all too easy to forget to 
do that. 


Figure 3. 
10 WINDOW 512,256,06,6:CSIZE 1,1:CLS 
20 AT 5,16:PRINT “Date and time= ";DATE$ 
30 AT 6,15:PRINT “yyyymmddhhmmss" 
4G AT 7,15: INPUT d$ 
50 IF LEN(d$) <>1i4 THEN 


AT 10,2:PRINT “wrong format™:GO TO 28 


SDATE d$(i TO &),da$(5 TO 6).da$(7 TO 8), 


4$(9 TO 16),d%(11 TO 12),d%(13 TO 14) 


CLEAR 


AT 4,13:PRINT “version 


EXEC_W mdvi_abacus 





screen by using the merge, F3 M, com- 
mand. 

You can choose to add or subtract 
Spreadsheet entries. Each cell in the 
spreadsheet stored on Microdrive is 
compared to the corresponding cell in 
the spreadsheet displayed on the sc- 
reen and if they both contain numeric 
data or valid formulae their contents are 
added or subtracted. The resulting 
spreadsheet contains only numeric data 
in cells which have been affected as any 
formulae they contained are overwritten 
by the results of the merge. Obviously 
it is important to design or modify 
spreadsheets which are to be used in 
a merge operation so that they are laid 
out in exactly the same way but, apart 
from that restriction, merging is a very 
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AT 6,4:PRINT “copyright 
AT 8,13: PRINT “spreadsheet"™ 
CLOSE #1:CLOSE #2:WINDOW #0,4060,20,35,215 


OPEN #1,s8cr:OPEN #2,s8cr 





AT 8,1@6:PRINT “Date and time="; DATE$ 
AT 9,8: INPUT “Is the date/time correct (y/n)";A$ 
IF A$(1)<>"y" THEN GO TO 10 


WINDOW 512, 256,8,80:CSIZE 2,1:CLS 
AT 2,10:PRINT “LOADING QL ABACUS" 


2.00" 
1984 PSION SYSTEMS” 


If you use the BOOT program given 
in figure three you will be asked for the 
date and time automatically each time 
you run Abacus. That is particularly use- 
ful when used in conjunction with a 
spreadsheet such as the freezer con- 
tents record given in part two. Another 
possible use of the BOOT program Is 
to define any special characters needed 
within a spreadsheet. 

As a final example of the range of 
which a spreadsheet is capable, the 
spreadsheet shown in figure four will 
set you a multiplication problem and tell 
you if the answer is correct. The same 
methods could be applied to a range of 
games and quizzes, so the details of 
how it works are worthy of attention. 


Figure 4. A spreadsheet which 
tests tables. 
A BC. .D .E...F 
Test on the 15 times table 


G H 


15° 4="60 
Correct 


type F3 X for another problem 


The first problem in setting a question 
is how to generate a random number 
in a given range. Abacus has no random 
number generator but it has a clock and 
for many purposes the reading of 
seconds from the system clock can be 


used as a fairly random number. Ex- 
tracting seconds from the time() function 
is a matter of using string slicing, i.e., 
time() (7 to 8) will return the last two 
characters of the time string. 
Converting the resulting two-charac- 
ter string to a number in the range 1 to 
10 can be achieved using the val func- 
tion, giving: / 
int(val(time() (7 to 8))/6+1) 
as the random number generating func- 
tion which should be entered into cell 
D3. The text shown in figure four 
should be entered into cells A1, C71 and 
C6. The number of times table to be 
tested should be entered into cell B1. 
That can be changed at any time. All 
that is left is to set the problem and 
check the answer. Setting the problem 
is done by entering the following for- 
mulae into the cells indicated: 






Formula/value 
B1 


Wk 









BS 


ES "= 

F3 askn(“what is” +str(B3,3,0) 
+"*" + str(D3,3,0)) 

if(F8=B3*D3, “Correct”, “Incorrect”) 


Notice that the random number for- 
mula has already been entered into DS. 
The function which does all the work is 
the askn function in cell FS. It asks the 
multiplication problem each time the 
user types F3 X and enters the response 
into Fs. 

The use of askn is interesting because 
it goes beyond the manual definition of 
how it works by including functions and 
cell references as part of the question 
it asks. After the user has responded to 
the question, the formula in cell F4 
compares the response with the correct 
answer and prints “Correct” or “Incor- 
rect” as appropriate. The way in which 
the IF function works was explained in 
the second article in the series. 

This simple spreadsheet is capable 
of being extended to include a count of 
how many correct answers there have 
been and to repeat the same question 
until it is answered correctly but these 
modifications are left to the reader as 
interesting exercises. 

There are only three main micro- 
computer applications — word proces- 
sing, database and spreadsheet. In the 
Psion applications packages we have a 
good foundation for all three and a good 
graphics package included. The only 
real difficulty in using Abacus is the 
amount of time it takes to import and 
export data using the Microdrives. With 
more memory the solution to the prob- 
lem would be to use an integrated pack- 
age similar to Lotus 1,2,3 but until 
someone writes such a program | will 
be very pleased to continue using 
Abacus. 
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Written by Tony Tebby. Uy 
OVER 118 COMMANDS INCLUDING FULL SCREEN EDITOR, PRINT USING, LAST LINE RECALL. iy 
ALTKEY, JOB CONTROL, FILE HANDLING, DEFAULT DIRECTORIES, EXTENDED NETWORK ln] OPEN 
(ALLOWS DISCS, PRINTERS ETC TO BE SHARED BETWEEN QL’S.) NEW BROACAST PROTOCOL. 9am-5pm Mon-Thu 
16K Eprom Cartridge Version .............sssscssssecsssssees @£ 34.50d Software GQ) 9am-4pm Fri-Sat 
Configurable Version on Microdrive ..........c.cccce.s... @£ 34.50d : : P 
. Configurable Version on 3.5” DISC .ececcccccec-.-......... @ £ 34.50d a” DISC DTVOT oan Sal ee een eee OF ne 
DOT MATRIX PRINTERS WG Aitince dete sein oe... OE 1D 85E cy GD 
Kaga Taxan 810 With NLO .......ccccccccsssscccsssssssccsssssecere @ £247.25a | COLIN OPIE VIDA REBUS | 
Kaga Taxan 910 with NLO................. @£391.00q ARAMA SS Software INV 
Printer Switcher 21D W nnnnnnnnnninnienninninn @£ 34.50d ima ll Pye Si ae a fai 
SOME CODD AINE ca, ase eters asa ia £ 7.82c _—UFOSS ASSEMDIET DOUZ/OOGUC .........essecssesssessneesresseesneesiee UC 
FeO RON TNT xp essa ces ectsuaessrtcvleg mcectrcsacce S £ 9.20c Cross Assembler 8048 Series ........sssssssesssessssseeesesensen @E£ 34.50c a ae 
SEU HSC REA sisctcntascecstnncarenittcee @E£ 6.90c 85 Characters (Inc lead) GARSTON, WATFORD, 
| MAGNETIC MEDIA | MEDIA Philips BM7502 Green Hi-ReS ...........c.scssseseesessessecseceveees @£ 89.70a HERTS. WD2-6NL 
Microdrives (Pkt 4) wnnnennsnsninnnnsnnenonnsnn QE ADS ee Eee ee Cea Tel 0903 6721 09 
MOROCINES (DOT 10) sce cb seas szascscccctintivcestacetecndttcesuesk UP MICO FES ssssssesssssssssssssonsssssccsnnecs 24 a8 : . 
per 10) SE ee. Hauck 12 Gaon Hees ements @£ 79.50a : 
Hantarex CT9000 Colour Med-ReS ...........sssssescseesseessessees @ £199.50a 
Se aE OG AO) ar scasenvensvevszoassavGovconesantin- i802 @E£ 13.80c 85 Characters (Inc lead) 
OTHER PRODUCTS gS EE a ae aa @ £294.40a 


EIT RIEEIMMIN (OCT 508s, sass toeaciavecteicviakzensdkevsnGeens, @E£ 9.20c 
EMHOND CONTIIES UST 5) oS ac esacces sed cdtesteictecns ercdcveavedlbcbes @E£E 34.50c 
Eprom: Cartridges (0810) ssccsccccsisscuscésce.a+ascedecadtovedsececces @£ 57.50c 
QEP Ill Advanced Eprom Programme ........c..ccecccsecesscosoee @ £115.00d 
EPFONT: 2764 ZOOTUS- BK. |... c0ccccaccvderstovoccascetccased.seceeseetor @£ 2.53c 





QJUMP/SANDY LT: Avalable October 1966 ROB 6 pn DN monte oe 
ee Sree Fe ne SENG sesseeeeees @ £688.85a RGB 8-7 pin DIN (Hitachi) @£ 5.29¢ 
Rectal Fan Sexe Hi nape! 1986, i ae Laake rerguaoe) ee @e eo NEW PRODUCT AVAILABLE 
Original QL 128 Board plus PTO aE MICRO) So 5 ors os cccececsvetessussssauvavivatteess @ .82c 
ee a an SWITCHING UNITS Q-XT460 COMPUTER 
VeEW Wien Pome wc Po Dees ee @£ 59.80d 
Nas ae Re RS232C 2 to 2 ‘x’ £ 69.00d 
*3 Expansion| slots DZ. DR sescssesconeseccescsuncsbensasviusssisasttctivsseteressiaeg @ ; od 
WIN. Single 3.5” DISC Drive .........cessscsscsessesecesoesececeeseosoeee @ £599.00a eT 





Wi DUST DISC DIVOS Boos cocosstssccvccocsvssseeceecizcsooseccess @ £699.00a 


Also Available in D.I.Y Kit format to 
enable existing QLs to be upgraded ..............cccccecseeceeee, @ £259.00a 
Sandy Super 512K QBoard inc Toolkit .............c.cccccccessee, @ £249.00 


| Ni PO) cee ore elt ceri oa bled lel @£ 391c 
‘ re GY OM lire cas ie ga 8 @£ 33.10c 


PRIS CREZ 1G 1G" REMONG: oes ocssstecaccascecsleoeesclossvessoseres @ £322.00a 


piel = mele) Wisse) (Philips/Pye TV’s Only) 


besiitiegeasUan ncthlae nt? Nassavesepsticsenssy, COO OU 
Sar idisas tad ssi cascesShoaass obtaip oa psNie keene ogpees @£ 80.50a 


EPROINE2Y L2G SOUS LOK cocacecscenscsseusssciics ativecotieceesseeces @£ 3.45c - 
Wide range of Connectors & Semiconductors. 
QL COMPATABLE COMPUTERS PHONO 10 oi .set Es oS Le ee. @E£ 2.60c 


Conversion Kit (D.1.Y) 
Factory Conversion 








_HOW TO ORDER: 
By Post. E Lheque/P.0. made payable to CARE Electronics. Or use ACCESS/VISA. Allow 7 days for 


By Post. Enclose 
delivery. Please add carriage. 











ALL PRICES INCLUSIVE OF VAT 





a=999 b=500 c=100 d= 2.00 


LD a a a a a ae ee ee 


BYTEBACK 


ADVENTURES 
Mortville Manor 





é Aquanaut 471 
y Baron Rouge ; Dragonhold 
ICE (complete) 4 Gwendoline 
Qspell : King 
Supercharge 
LANGUAGES 

Super Astrologer 
Professional Astrologer 
Super Media Manager 


£2 
Assembler Workbench . £21.00 
Metacomco Assembler . £35. 
Metacomco C £85.00 
Metacomco Lisp 
Metacomco BCPL 
Metacomco Pascal 


Typing Tutor : : BUSINESS 

Sign Designer Flight Simulator Impacct Sales £46.00 
Lands of Havoc E Impacct Purchase Ledger £46.00 
Citadel y Impacct Nominal Ledger . £46.00 

Impacct Stock Control .. £46.00 

Cartridge Doctor : Impacct (complete) 

Ram Disc , Archiver 


£8.00 Miracle Expanderam 256 

£4.50 Miracle Expanderam 512 

£4.50 Miracle Centronics Interface 

£7.50 20 Microdrives + Transform Box ... £ 39.00 


Zapper and Eagle 


Quickshot II Joystick 
Joystick Adaptor 
Transform Box 

4 Microdrive Cartridges 


*** NEW CATALOGUE NOW AVAILABLE *** 


ALL PRICES INCLUDE VAT AND FIRST CLASS POST 
TELEPHONE (0636) 79097 FOR PERSONAL ASSISTANCE 
Send Cheque/PO to: 


BYTEBACK 20a SPRING GARDENS, 


NEWARK, NOTTS NG24 4UW 














Exclusive Datalink QL Products 
Datalink SPI — QL wcscssssssssssesessessserseres £17.95 


Serial to Parallel Printer Interface 

Plug-In-And-Go design, compatible with 

any Centronics Parallel printers. 

Datalink RS-232 QL Printer Lead ..... £6.95 


QL to 25 Way D Plug printer lead, 
2 metre cable. 


Datalink QL Joystick  ...ccssssssseseees £9.95 
Quickshot II Style Joystick, 3 fire buttons 
Plug direct to CTL 1 or 2. 


Datalink QL Joystick Adaptor .......... £4.50 
Convert any Atari/Commodore/Spectrum 

joystick to use with QL. 

Plug direct to CTL 1 or 2 via adaptor. 

Prices include Postage, Packing & VAT 
Overseas orders please add 10% to cover 
postage 

12 months warranty and 14 days money 
back option with all Datalink Products. 























Dealer, Distributor & Export Enquiries welcome. 





Datalink U K Payment by cheque or 






99 Constitution Street Visa Card Welcome 
Leith Telephone for immediate 
Edinburgh, EH6 7AE dispatch 031-554 6040 








All trademarks acknowledged 
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On Tuesday, July 22, the 
winners of our Eidersoft 
mouse competition 









converged on the Sinclair 
QL World offices to collect 
their prizes. 

Our pictures show Gloria 
Graham, Mike Grenville and 
Graeme Archer receiving 
their mice from Ken 
Browning of Eidersoft. 

Twenty-nine-year-old Mrs 
Graham is a team support 
worker at Lambeth Youth 
Aid Project. She uses her QL 
at work to maintain a local 
events database and at home 
to teach herself 





Bue 


programming. , 
Grenville, 36, is a sales 


i i 
agent for British Airways. 
His main areas of interest are 
comms, educational 
programming and graphics 
applications. 
Sixteen-year-old Archer 
from Ardrossan in Scotland 
spent eight hours on the 
night train from Glasgow to 
make sure of collecting his 
prize. He is planning to 
study mathematics at 
Glasgow University and saw 
the review of the Eidersoft 
mouse in Sinclair OL World 
and was so impressed he 





prizewinners are W. S. 





competition. 
The other three 


Sambrook of Birmingham, 
O. Carey of Darlington, and 
Fabien Roche from 
Pontcharra, in France, who 
will be receiving their mice 
through the post — RSPCA 
permitting. 

Although the closing date 
for the competition has now 
passed, the surveys are still 
arriving and to date we have 
received nearly 2,000. Sifting 
through the entries it 
appears that most of our 
readers are men aged 
between 25 and 435 in 







technical, scientific and 
administrative occupations. 


It is not surprising that 
_many are computer 


programmers or work in 
computer-related 
occupations. 

We are at the moment 
analysing the results with the 
help of Archive. When that is 


~done we will be in a better 


position to provide you with 


_a magazine even more 


closely in tune with what 
readers want. 


decided to enter the 


THIS IS THE UPGRADE! 


You have an excellent microcomputer .. . 
You have superb programs with brilliant 
graphics — you may spend yours with text or 
design work. 
IT IS ALL WASTED OR NEEDLESSLY HARD 
WORK WITHOUT A HIGH RESOLUTION 
MONITOR and by ‘high’ | mean 585 x 895 
pixels. The QL uses 256 x 256 on 256 x 512 
pixels so why bother with a high res. monitor 
you say. Because the pixels on the screen 
are not the same as from the computer. 
On an ordinary screen pixels get lit that 
should not or extend beyond the point in- 
tended so giving fuzzy images. Also, as the 
spaces beteen pixels are bigger, all colours 
are weak. 
CHROMA 1 shows text and graphics bril- 
liantly. 
| DATA: 14” screen; T.T.L. & Linear input; 
green screen mode; Inverse T.T.L. mode; 
£299.00 including V.A.T. and carriage. 
Chromographica 
35, Cliff Road, Hornsea 
N. Numberside. HU18 1JB. 
Phone: 04012 4699 
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FOR THE SINCLAIR QL:- 

JOSS £15 on mdv or 514” fip, £17 on 312” fip 
Forget syntax errors and mistyped names in file commands! Just move a cursor 
and press SPACE. Cursor keys or joystick allow access to up to 8 microdrives 
and all the discs your interface will handle, with up to 150 files on each. Scroll 
& print directories, COPY, DELETE or PRINT any file, select TV or Monitor mode 
before LOADing/RUNning a program. Use keyboard only to set date or label a 
medium. Easy to use with Psion or other software. No silly icons to learn - 
JOSS will tell you what it’s doing! Mass copying/printing utilities and programmer's 
toolkit. Specify disc size, tracks and interface (CST, Cumana, PCML, 
MicroPeripherals) or microdrive only. 


£11 on 2 mdvs or 1 314’ fip, £9 on 514” fip 
For use with ARCHIVE 2, contains 1300 useful references and a search/print 
program. Find programs, articles and reviews buried in the magazines on your 
shelf! Cheap updates of earlier editions. 


Mdv Extension Cable (8" 
Add ZX Microdrives to your QL. 


FOR THE QL, SPECTRUM, (ALL), BBC & ELECTRON:- 
WD Morse Tutor £4 cassette, £6 mdv or 514", £8 314” 
Teach yourself to read Morse Code. From absolute beginning to 18 wpm! Feedback 
on screen or printer. Random letters, numbers or mixed, 100 random sentences, 
many helpful features include phonetic speech via Currah Micro-Speéch 
(Spectrum). Discs unsuitable for BBC B+. 

We export hardware and third-party software. Ask for lists 


PAYMENT:- 
In advance, in STERLING on British bank branches, international Giro, Postal 
Order or . Add £1 outside Europe for AIRMAIL. 


FROM:- 


WDSoftware aw, 


Hilltop, St Mary, Jersey, C.I. Tel: (0534) 81392 
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SECTOR SOFTWARE 


* 0772 454328 * 


TOUCH TYPIST TYPING TUTOR (VERSION 5) 

Touch typist (version 5) is the fastest typing tutor available for the Sinclair QL. It will teach you to type at up to 
211 wmp with a fully interactive keyboard on the screen. It is 100% machine code and has been carefully 
designed to fit in a standard QL whilst still having a host of features crammed into its 85K+ of machine code 
and has a keyboard tutorial to show you the keyboard basics, a demonstration option, 3 teaching modes, 
adjustable targets to 211 wpm and 100% accuracy, very fast interactive keyboard, your results can be displayed 
on an auto scaling graph, results can be saved to drive for future additions, the full lesson editor will allow you 
to alter and customise any or all of the 200 lessons which can then be saved to drive to create a library of 
custom lesson sets, also included is a reward option where if selected, providing you meet the requirements 
you specify, you will be given a 100% Machine Code arcade game as a reward for your progress. Touch Typist 
can be transferred to disc, another Microdrive or RAMdisc with the copy program supplied and can be invoked 
with the EXEC_W command, supplied on Microdrive in a 4 cartridge wallet. 


ONLY £11.95 
TOUCH TYPIST received a four star rating on QNET2, the reviewer Nigel Barker said “For all 
people who want to improve their typing this program is a real boon, it is well written and easy 
to use”. 
“Succeeding admirably as a serious course intended for beginners and experienced typists alike 
Touch Typist is a well presented useful utility which includes the professional polish of good 
quality software” — QL WORLD JULY 1986 
And they haven’t seen version 5 yet....... 
Due to the great success of Touch Typist we are offering an update to version 5 to anyone with 
versions 1-4 for £1.00 to cover costs. Simply send your old version stating where purchased 
together with £1.00 and we will send you version 5 by return post. 
Sector software have over 200 products for the QL and will be pleased to assist you with any 
of your requirements. 


















* & & 


SC eT Bs Mian tee T= ES A eee BP £13.00 






OUCH TUPISE S275. ieee elec een £ 11.95 
DARE NN He eset toner eo causa eacastocrtea tetas k 
Assembler Workbench ............cccscccsssssseseseees £ 24.00 
Supercharge Compiler ..............:.csscesseeseeeees £ 50.00 
SUZ EXPAT ENN. osoeccassvecoserssosccorsvecesscesens £119.00 
Supertoolkit 2 (Eprom) .......:.ecssssesssssseesee £ 34.00 
OCIMWGCA 55:05; scdasssssvestecicsrcaceacinas eae ae £ 50.00 


SUPOF: ASWOIOGEN sisisicssousscopestcsessasusecaccecesteroxe 
POPUID Soi -Sasvee casatcctensdensitecntevesacscvarcocanepinzcates. £33.00 
Cartrige  DOCTON ccasssssiverivsnnasscsteveqxesbissscviyostes £13.00 
NO S/DBES:55 DISCS \sincsessevccstectesccesasmuacoceiae £34.00 
PVG ERIS, cs hcch Aresceneactaret Mth nmnuteee £25.00 
SSOUACN ONY. Geet fs ete cs cron ssvcetnnccench ROD £16.00 
ZADPOT: WITT: FACIE)... <acesecceccctecocvesisscnocesopavocees £ 9.50 


This is only a small selection from our range 
Phone or Write for more details 
SECTOR SOFTWARE 
45 CHEETHAM MEADOW, MOSS SIDE, 
LEYLAND, LANCS PR5 3UB. 

TEL: 0772 454328 PRESTEL MAILBOX 772454328 

access ACCESS AND VISA CARDS WELCOME <a 

ESS PLEASE NOTE ALL PRICES INCLUDE P/P. 




















MICRODRIVE COPYCAT 


Make copies of those protected programs. 
Will backup most software .........scsseesse 





MEDIC DISC SYSTEM UPGRADES 


Additional 256K .............. E19, SIO csistescsancecsicdes £129 
Additional 3.5” disc drive 





UNDISTORTED SCREEN DUMPS 


“1 to 1 Dump” enables you to get true hard copy 
of your screen images 








RUN THOSE AWKWARD PROGS 


WITH... 
Boot 128K. Fools your expanded QL into thinking 
it has only 128K RAM. Easy to use. ....cccccccscssecesseces £4.99 






READ AND WRITE MICRODRIVE 
SECTORS... 


with extensions to SuperBasic .......ccccsscsssssssesseseees £9.99 
or 1000 lines of assembly source code .....eecc... £29.99 


QL DISC DRIVES AND RAM 














Cumana 3.5” drives: Single ........ £141, dual ......... 
WuMmatia, CISC WETIACE ac ji chloia sos Bccsdiatececeoeoics: £89 
312K Expanderam (works with Cumana I[/F)......... £125 
Super Qboard disc & printer I/F & 256K RAM ..... £214 
Super Qboard with 512K RAM ......cccccscssscccccssseee. 
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EN MIRACLE SYSTEMS Z5 


— 14 day money back guarantee on all products — 
— ]12 month warranty on all products — 
QL CENTRONICS PRINTER INTERFACE ........c.ccccccessenessesss £19.50 


* Complete unit including 3 metre cable 
* Plugs into either SER1 or SER2 








* 3metre cable 


QL JOYSTICK ADAPTOR. ........ccccccscsccsssscssscccessscssessessseseseseencces 
* Lets Atari/Commodore/Spectmim joysticks plug into CTL ports 











* Copies whole or part of screen to Epson compatible printer 
PRs PUMPER PR IIR occa nalvccccrsell cabs citonenscvasinaleunscdBreusesscacstatecseseereene £39.00 









* Links QL to 300/300, 1200/75, 1200/1200 modem 

QOL EXPANDERAM 256 «..ccscccssscsscssssscsssssosccsonsscsesseessencescscosecce £95.00 
* 256K RAM with through connector for DISK/F 

QL EXPANDERAM 512 o.iiisccscsccccsccccscscssccsssescessccencecsnceseseensses £125.00 
* 512K RAM with through connector for DISK I/F 






QL RAMDISC SOFTWARE .....cccccccscsssscsssessssscenssesessesesesseccseesee £14.95 
* Configures RAM as disk lookalike 

* Ideally suited to MS EXPANDERAM 

* Enables Microdrive software to run much faster with less wear on 
* 





microdrives 
Fully compatible with Psion packages, SuperBasic etc. 










MIRACLE SYSTEMS LTD Please send CWO. 
AVONDALE WORKSHOPS (UK ORDERS - prices include 
WOODLAND WAY V.A.T. & Carriage). 
KINGSWOOD (OVERSEAS ORDERS - prices 
BRISTOL include Carriage) 
BS15 1OL Send SAE for catalogue. 
Tel: (0272) 603871 Ext 210 

SINCLAIR and QL are trade 






marks of Sinclair Research Ltd 




















STOCKS LAST 
RRP £299 

12” high resolution colour monitor 

complete with QL cable and 12 month warranty 


ASTRACOM 1000 Modem £198 


Auto answer/dial modem with QL software. 
300, 1200, 1200/75, 75/1200. Call for data sheet. 





















57 REPTON DRIVE 


NQMWBWAGZL) ceeirescin isa 


(0270) 582301 


PRICES INCLUDE VAT AND DELIVERY 
EXPORT ORDERS WELCOME: WRITE FOR TERMS 
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James Lucy concludes 
our Machine Code mini- 
series with a-look at the 
available monitors. 





— he 68008 microprocessor 


‘used in the QL is a great 
attraction for the machine 
code writer; among its 
«i advantages are its many re- 
gisters and a particularly rich instruction 
set. Those advantages nevertheless 
can expose all the more pitfalls for the 
unwary and it is easy to overlook the full 
action of one of the more complicated 
instructions or to lose track of the con- 
tents of a register. When that happens, 
or for other purposes like spying on the 





working of someone else’s machine » 
be in possession of the source code, it 


code program, it is time to reach for the 
monitor. 
In this article, which follows from last 


Supermonitor from Digital Precision. 
Inexpensive, but no comparison. 
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month’s on machine code and as- 
semblers, we look at what is required 
of a good monitor and compare the 
facilities provided by the various com- 


mercial offerings to this requirement. . 


There is obviously no point in using a 
monitor unless you have at least a pas- 
sing acquaintance with assembly 
language programming; — working 
through last month’s article will provide 
a basic grounding. 

The first problem is to decide exactly 
what constitutes a monitor. Like most 
terms in the computing world the defin- 
ition is not exactly set in concrete but, 
at the minimum, a monitor is a program 
which allows the user to scrutinise the 
operation of another program in as 
much detail as desired, if necessary in- 
struction by instruction. 

Since the user may not be the author 
of the monitored program and may not 


is useful if the monitor can convert the 
unintelligible numbers constituting the 


Mon QL is supplied as part of DevpacQL. 


&8er 
For the Sinclair QL 





ACKNE 


machine code program into assembly 


- language statements which can be 


understood by people — that is, it should 
operate as a disassembler. 

If the monitor is to correct or modify 
a program, a one-line assembler or the 
ability to modify memory locations 
directly will be required and in that guise 
the monitor will be operating as a de- 
bugger. Ideally, then, the product you 
buy should be a monitor, disassembler 
and single-line assembler rolled into 
one. As can be seen from the table, 
some products fall short of that ideal. 
Two unusual and useful variations are 
complete machine code development 
packages, where an assembler and 
editor is included in the monitor, and 
the packaging of the monitor as a plug- 
It RO Mies = 







The monitors tested have many 
facilities and are, in the main, sophisti- 
cated programs. For that reason it is 
not possible in this article to describe 
every product in detail but each pro- 
gram has a personality beyond the bald 
facts in the table which, not surprisingly, 
will have a considerable bearing on how 
well you accustom to it. Accordingly a 
thumb-nail sketch will be attempted for 
each monitor. First, though, we look at 
some general considerations when 
monitoring programs which should 
make some of the table headings 
clearer. 

A general problem with monitors is 
their location in memory. If a monitor is 
‘EXECed’ from Basic it will be loaded 
as ajob and, while it may well multi-task 
with the SuperBasic interpreter, its pre- 
sence will prevent resident procedure 
space being allocated, as may be 
required for a machine code SuperBasic 
extension. 












The Microdrive version of MonQL can 
be loaded into resident procedure or 
heap space. Qmon is not EXECed 
either, and the other monitors at least 
have facilities for reserving heap space 
from within them. Even more important 
than location is size; if you are trying to 
monitor a reasonably big program on an 
unexpanded machine it could be frus- 
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trating to find that the monitor will not 
fit. The table shows the size of the pro- 
grams; it is interesting to note that Qmon 
includes a cut-down version without the 
assembler facilities which is about half 
the normal size. 

An interesting difficulty arises when 
trying to monitor programs which use 
the screen a good deal; since the 
monitor will also be displaying its output 
on the screen there will be trouble. The 
Digital Precision monitor allows the win- 
dow used to be re-defined before the 
start of a session, the display for MonQL 
and Assembler Workbench may be re- 
sized during monitoring, and Qmon 
supports transient windows. 

That means that the area of screen 
which will be over-written by the monitor 
is saved to the heap, whence it is re- 
stored when the monitored program 
continues. In the meantime, the monitor 
can display the desired information. 

The fundamental function of a monitor 
is to trace the operation of a program. 
That can be done by setting the trace 
bit in the 68008 status register, or by 
other means, but in any case a simple 
trace Is inadequate on its own. You may 
wish to trace a few instructions, run the 
program at normal speed until a certain 
point, then run the program slowly until 
a particular condition is met. 

_ When that happens, you might want 
to execute an arbitrary mix of monitor 
instructions. You will probably wish to 
disable the trace during calls to Qdos, 
in long loops within the program and 


QMon 
(QJump) 


PRICE 
£20 


SIZE (KBytes) 


DISASSEMBLY Yes 
MEMORY CONTENTS DISPLAY 


MEMORY EDITOR 


Numbers 
Strings 
Instructions 


MEMORY SEARCH 


COMPARE MEMORY BLOCKS No 
MOVE MEMORY BLOCKS N 
TRACE (SINGLE STEP) 
Breakpoints in RAM/ROM 


Yes 
Both 


TRACE UNTIL CONDITION Yes 
SET & DISPLAY REGISTERS Yes 
PSEUDO-REGISTERS No 


MACROS/CLONES 
USER-DEFINED KEYS 


ALTERABLE SCREEN DISPLAY 


JOB CONTROL 


ON-LINE HELP No 
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11 (Qmon 5) 


HEX and ASCII 


Yes, simple 


Macros executed 
automatically 


No, but transient 
windows 


Separate File 


perhaps during calls to subroutines, but 
you would like to retain the option. The 
program which probably best satisfies 
those requirements is Qmon, although 
all the others except the DP monitor will 
do something similar. 

A feature exceptional to Qmon, 
though, is the ability to back-trace, which 
is extremely useful if you over-shoot 
your intended stopping-place during 
tracing. The back-trace is somewhat il- 
lusory, as it seems to involve decre- 
menting the program counter and re- 
storing register values from a buffer; it 
is useful, nevertheless, and you did not 
expect reverse gear on a 68008, did 
you? 


An important area, in which the pro- 
grams differ considerably, is memory 
searches. The DP monitor distinguishes 
itself by having no search at all; Com- 
puter One and Assembler Workbench 
can search for strings and numbers but 
Qmon and MonQL can also search for 
instructions in whole or part, e.g., 
‘Moveg #0,’. Searches are useful for all 
kinds of things; you might want to 
change all occurrences of ‘mdv’ to ‘flp’, 
for example, or you may wish to look 
for the instructions which read the 
magic number from a cartridge. 

Finally in our round-up of monitor fea- 
tures there is the question of line as- 
semblers. Suppose that, in the course 
of debugging a program, you discover 
a Slight error in an instruction. With most 


MonQ@L 
(HiSoft) 


Assembler 
Workbench 
(Talent) 


£20 Cartridge 
£30 ROM £25 


14K (Cartridge) 20 


Yes Yes, includes 
ASCII Dump 


HEX and ASCII HEX and ASCII 
Yes, simple 
ASCII Entry 


Numbers 
Strings 


Numbers 
Strings 
Instructions 


No No 
es es 


Yes Yes 


No 
Yes 
No 


Definable 
function keys 


Yes, limited 
for graphics 
Yes Yes 


Good 





Excellent 






Full editor, HEX or 


Yes, and Dual Screens Yes 


monitors you can patch the machine 
code by poking-in the corrected value 
but that assumes you Can work out the 
opcode. If not, you are compelled to 
return to your editor and assembler to 
correct the error. 

A monitor with a line assembler solves 
the problem, because you can type-in 
the assembly language instruction and 
have it converted to machine code and 
placed in memory automatically. The 
only products with that very useful fea- 
ture are Qmon and Assembler Work- 
bench. 

There are other features which are 
useful or essential, such as disassem- 
bly, in which there is not much to choose 
between the programs; copying sections 


of memory, a feature Qmon strangely 


lacks, help screens, pSeudo-registers, 
job control and so on. Good documen- 
tation is vital with products of this kind, 
preferably with many worked examples; 
without proper documentation even an 
excellent product can appear poor and 
the purchaser will never appreciate the 
full power of what he owns. Where ap- 
propriate, all those points are discussed 
in the notes on each program. 






This is an enhanced version of QL 
monitor, as supplied by Sinclair, both 
programs being written by Tony Tebby. 
The enhancements include some of the 
most pleasant features of the program, 
like back-tracing, macros and search 
for assembly language instructions. 


Monitor 
(Computer One) 


QL Super Monitor 
(Digital Precision) 


£25 £19 
18 9 


Yes, withoptions Yes 


HEX or ASCII 
options 


No, Modify 
Individual Locations 


Yes, 256 Bytes only 
Yes, simple 


Numbers 
- Strings No 
Wild Cards 


es No 
es No 
Yes,manyoptions Yes 


Both (watchpoints RAM only 
in ROM) 
Yes No 
Yes 

Yes No 


Clone Individual 
Commands 


Yes, not within 
monitor 


Yes No 
Brief No 
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The macro feature allows a number 
of monitor commands to be executed 
automatically after each trace step, ata 
breakpoint or as required. All com- 
mands are defaulted intelligently, which 
means that operation soon becomes 
natural and easy. The single-line assem- 
bler is an excellent feature. 

A curious omission is the ability: to 
move portions of memory, which can 
be useful if you want to make room for 
extra instructions in a program. The 
documentation is good, except that the 
examples are a little simple and do not 
demonstrate many of the facilities. 
Highly-recommended. 


One of the best features of the Com- 
puter One offering is the documenta- 
tion. It needs to be good because, apart 
from the fact that there is no single-line 
assembler, it is a very comprehensive 
product. One of the most interesting 
features is the capability to clone 
monitor commands into daughter jobs 
which run independently. It is thus very 
easy to watch an area of memory, for 
instance. 

The monitor has a rather academic 
and rigorous air about it and | found it 
needed a good deal of thought to oper- 
ate. ‘Junk at end of line’ is a rather inde- 
licate way of describing one’s errors. 

The monitor is optimised for tracing 
jobs, rather than SuperBasic exten- 
sions; the latter requires some thought. 
It is not possible to search for 
instructions but the monitor is excep- 
tional in its provision of pseudo-registers 
and a compare facility which will high- 
light the point at which two blocks of 
memory first differ. Recommended if 
you are prepared to put in the mental 
effort. 
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MonQ_t is supplied on Microdrive as 
part of DevpacQL or on a ROM in its 
own right. The variants are functionally 
the same, except that the ROM uses 
very little memory and is available for 
use immediately. All the commands 
work neatly but once again there is a 
lack of a single-line assembler. 

There is, however, an intelligent copy 
which can move a block of memory into 
an overlapping area and a very neat 
system of listing Qdos traps; whenever 
you request a list of trap routines the 
monitor senses the contents of register 
DO and places an asterisk against the 
appropriate routine in the list. 

The monitor window can be re-sized 
at any time but the layout of the display 
is a little confusing and cannot be con- 
trolled to any great extent. | found the 
choice of command names to be rather 
‘un-nmemonic’ and _ difficult to 
remember, although that is personal. 
The documentation is reasonably good, 
with some helpful examples. The 


monitor. is satisfactory, especially in 
ROM but | prefer some of the others. 





Granted this is reasonably inexpen- 
sive but it does not stand comparison 
with the other products. For documen- 
tation you choose between a micros- 
copic print-out or a Quill document on 
the cartridge. There is no search, no line 
assembler and weak trace and break- 
point faciities. 

In favour of the program, there is a 
useful file-sizing utility and any-base 
number conversion, and a back-up car- 
tridge is provided. Perhaps the worst 


thing about the program is the descrip- 
tion that it is state-of-the-art, top-flight, 
feature packed and amazing. It seems 
strange that it is from the same software 
house as Simon Goodwin’s excellent 
SuperBasic compiler. 


There are only two shortcomings in 
this excellent program. The first is the 
documentation, which is on cartridge 
as an ASCIl file, readable from within 
the monitor or by the supplied editor 
and lacking any tutorial, and the second 
is the relatively minor lack of a search 
for instruction facility. 

Apart from that, the program is first- 
rate — sensibly-defaulted, helpful with 
errors and with all kinds of on-line help 
available. Dual screens for debugging 
graphics programs are possible; the 
function keys may be _ user-defined, 
commands may be taken from a file 
rather than the keyboard, and a small 
memory editor is provided. 

The monitor gives Qmon a very close 
run for its money and includes a good 
assembler and excellent editor to boot. 
it is a pity talent has seen fit to copy-pro- 
tect, unlike any of the others, because 
that makes life more difficult for the 
genuine users and boosts sales of un- 
locking programs. 


If you do not already have an assem- 
bler, the Assembler Workbench is the 
best choice. If you do, you might prefer 
the style of Qmon marginally. If you like 
your monitor in ROM, MonQL is an 
acceptable program. The Computer 
One offering is very sound and has that 
powerful cloning command but QL 
Super Monitor from Digital Precision 
leaves a great deal to be desired. 
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eeoye PROFESSIONAL ASTROLOGER 


By Elmar Duensser 


An amazing new Astrology System, for both beginners and experts. It comes with a large and fully comprehensive A4 manual —no knowledge of 
astrology at all is required. This package will allow you to not only obtain an extremely detailed personality/character delineation (typically 6-9 
pages of single-spaced A4 text!!), but also to get individualised text interpretations for predicting ahead, both on a year-to-year and on a day-to-day 
basis. The entire system occupies 4 microcartridges with 300K of text data — diskette users get even larger files. And the system does 
synasiry/compatability testing too, with automatic text readout! We've thought of everything this time! 

“The most powerful & complete astrology package on any micro.... provides everything that a present day Nostradamus will need.... the ultimate 
astrology package.... a 5-Star (* ++) program — a Sinclair User Classic (the highest award given to any program)” SINCLAIR USER 


* * An Astronomer module is available to users of Professional Astrologer. £7 if ordered with Prof. Astrologer, £10 if ordered later. The module has: Moon/Venus/Mars faces, 
declinations, eclipses (exact display), actual Planetarium view for any time, date & location. Choice of 5 coordinate systems. Solar system display 
with zoom, autoincrement, variable position, etc. 














Features wiarkne |) hemor: 

Automatic House Calculation * * 

Text files for House Interpretation 31K 7OK+ 

Automatic Sign Calculation * * 

Text files for Sign Interpretation 37K 80K+ 

Automatic Aspects Calculation * * 

Text files for Aspects Interpretation 30K 70K+ 

Graphic print of Natal Chart Not proportional Proportional 

Interpretation uses ASC + M.C. = * 

Calculation Accuracy this century Within 5 mins, Within 1 min. 

User Definable Astrological Character Set * x: 

User-Modified Interpretation files with * * 
AND/OR logic — full screen editor 

User Definable Printer Driver * * 

Output to Screen/Printer/Microdrive/Disk * * 

Automatic Progression Calculation * * 

Text output for Progression Interpretation = * 
allowing Year to Year horoscopes 

Automatic Compatibility Calculation * * 

Text output for Compatibility Testing allowing = 
automatic comparisons between individuals 

Automatic Transits Calculation = * 

Text output for Transits Interpretation = * 
allowing Day to Day horoscopes 

User-Definable House System - * (6 defaults) 

User-Definable Aspect Orbs = * 

Text & Defaults Editor programs SuperBASIC M/code 

“NOT” facility in Interpretations - * 


Selective “ANYTHING” facility (<8; 
anything in Third House Biquintile 
anything in Aries) in Interpretations 


Batch printing/processing * 
Narrowing/widening/Stationary Aspect indicator - * 
Sample Birth data files 20 150+ 
Birth data file compression - * 


SINCLAIR USER CLASSIC £A9 Oe, 
KKKK Kk a 
NEW Sum 

LARGE A4 MANUAL 








THE DEFINITIVE QL GRAPHICS PACKAGE 
By Charles Southey 


We would love to tell you all about this superb system — but space is short. Take it from us, we've looked at every single graphics & CAD program available on the OL 
(£49.95 systems included!) and combined their best features with our own ideas. The result ... EYE-O (yes, it is intelligent). Design your own full colour screens with 
complete ease — ALL the features are here. Fully driven by pop-up menus * single key entry * several zooms * windowing * proportional movement * paint/fill * 
rubber bands * arcs * ellipses * circles * lines * files * replicable sprites * horizontal & vertical stretch * reflect * invert * transfer * pan/scroll * undo (ie; whoops!) * 
font design editor * automatic anti-aliasing * graphic screen compression * offset display * on-screen help * XOR/OR cursor with variable width * paste * recolour * 
magnify * reduce * text inclusion * freehand movement x localised save/load/scroll/pan/recolour/zoom * integral sprite editor * full range of QDOS colours & stipples 
available through paintbox * user-definable defaults . . . If you already have a graphic system, throw it out. Eye-Q is in a class by itself, a state-of-the-art program from the 
people who brought you Sprite Generator & SUPERCHARGE. The system is supplied complete with a fully comprehensive A4 manual. Fully compatible with 
SUPERCHARGE, joysticks, mice &, of course, Sprite Generator. 





£24.95 COMPLETE WITH EXTENSIVE DOCUMENTATION 


Seas. SS ee EA GRAPHIOE  EVYEQ Features QDRAW/GRAPHIQL 





























EYEQ 
‘Freehand’ cursor drawin * * Fullscreen reflection x x 
pA Uc a i a AI i, eae Full screen inversion * * 
Nae eateur eek cies. GE ig. "= vee PU A Eee Full screen stretches = * 
ATR ERECT ERECTION Oe es i ee a “Role Sia Full screen recolour * 
ete en rere ween. T= se ee Full screen scrolling/panning - * 
All QDOS colours available Only solid colours Full range of under cursor-key control with 
colours & stipples rispevoUne OR cope deletion. | Sea 2S Se ee 

Paintbox colour selection = * Local area transfer * * 
Fully menu-driven = * with reversal - * 
Zoom-in X4 & X16 * * with inversion - * 
Fill facilities Only solid colour fill Any colour fill with stretching (hor. or vert.) - * 
Rubber banded lines * * Localised scrolling/panning as above - * 
Rubber banded arcs = * Localised recolour - * 
Rubber banded circles = * Localised/Full screen size reduction - * 
Rubber banded ellipses * Access to HI/LO resolution within program ~ * 
Rubber banded boxes = * Integral character editor ~ * 
Full file operations * * Screen Compression ~ * 
Localised area load/save * * Monochrome Save - * 
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EW SUPER MEDIA MANAGER 


By Colin Opie 


An essential program for anyone who uses microcartridges and/or disks to store things of value! No more need you fear for the safety of your programs & data. Super Media 
Manager provides a host of device management tools in one integrated, fully menu-driven unit — an unbelievable 350K of programs! 
* Selective directory, copying, and erasing of files * Direct file copying from other disk formats (PC-DOS, MS-DOS, CP/M, Acorn DFS etc, 
* Sector loading and viewing (cursor controlled) etc) — sector copying to other disk formats. 
* Sector editing — Hex. and ASCII input allowed * Text file translation utility 

Automatic reports when mapping sectors — expands tabs, converts CR/LF to LF intelligently: converted files may be 

* Sector copying to sector, file, device etc. imported to Quill. 
* Viewing, printing, or saving of drive map details * Disk sector editing for both OL & non-Ql disks, with all the usual features 
* Automatic (semi-auto on disks) recovery of deleted files * Full error reporting with automatic recovery 
* Bulk recovery of corrupt files to new files * Hexadecimal calculator 
* Header block or Disk type information display * System configuration 
* String searching by sector or file — ultrafast * Full directory sort facility, by name/size/type/date etc 


Control wpte 256 ‘cartridges/disks = DIRECTORY of DIRECTORIES 


Talent Talent a 

Features Cartridge Dector Media = anager Features Cartridge Dector Media Manager 
Automatic file recovery * Sector copying ~ * 
Intelligent directory handling Header block reporting * 
Sector editing 7 Drive map reporting 
File block salvage String searching (3 types} 
Transliteration by character _ Formatted print utility 
Transliteration by string : Selective directory/copy/delete 
Text file format translation Intelligent directory sorting (multiple criteria) 
Sector viewing Printer echo facility 

PLUS ALL THE DISK FEATURES (Cartridge Doctor has none!) 






























































Super Media Manager is supplied complete with an 80+ page A4 User Manual. 
£39.95 COMPLETE £19.95 FOR A CARTRIDGE-ONLY VERSION 


os eae V3. 3.0m Ian Robinson _ - . : . 


An ohne compact powerful, feature- filled, SUPERCHARGE compatible 
-_ machine code system — an essential for anyone who wants to write or 
understand mvc. "A useful, straightforward development tool” is what QL USER 
magazine said. Edit/Catalogue/Modify/Disassemble/Trace/Dump/Breakpoints/ 
Outpul/Pul/GetJump/Registers commands, with single key entry. 


£18. 95 COMPLETE or £16.95 if ordered with SUPERCHARGE or Media Manager 





* SUMMER BONUS - You may deduct £2 from the total price if you buy any 2 programs, £4 if your buy any 3 programs, £6 if you buy any 4 programs and so on. (These offers do not 
apply to upgrades). 

* Orders from abroad are welcome. Please add £1 (£2.50 for programs over £25) per program for orders from Europe and £1.50 (£4 for programs over £25) per program for orders from 
other countries, to cover airmail postage and packaging costs. Cheques from abroad should either be drawn on a UK bank or be Eurocheques — if you are unable to obtain either of 


these add £5 to your order price to cover cheque clearing charges 
* Ifyou have an early version of one of our programs, send the microcartridge(s) (not the packaging) to us accompanied by £5 (£10 if SUPER ASTROLOGER or over £25). 


* All our software is 100% compatible with all memory expansion & disk systems. 
* Programmer & dealer enquiries are welcome. Demonstrations of all our programs are available at Micro Anvika, 220A Tottenham Court Road, London. 


x apre CHARGE+ ICE is available for £79.95 — or £89.95 with CHOice too! Special prices on all EIDERSOFT programs — just phone us 
* All our Software is compatible with the THOR & QLT machines — we guarantee to support the QL & QL compatible market through 1986 & 1987 at the very least. 


LE NSE i GENER iem TT ger min mee 
To: DP, 222 THE LONDONE49SE 
[Or use the Credit Card tinge _AMOIGITAL PRECISION 
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| Sage At 












Post Code:_ 


: Baclosed 1] Gecus ea ah ie Ae. O. Ly [_] Access/Mastercard L] VisalBarlayeard 
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UTIL 
FILE 


Ron Massey reports 
on this month’s 
utility packages. 


QL Diary 
Data Management 
S11.95 


Keeping a diary has become 
a very important aspect of 
organising our lives and 

_ activities into something 
resembling logical 
progression and order. That 
popularity of the concept of 
the diary is almost universal 
can easily be seen by the 
diversity of diary types 
available for almost any 
particular application. 

With the facilities offered 
by the OL, it was inevitable 
that electronic diaries would 
find their way into the 
repertoire of software 





Iry 





to have personal, business 
and social engagement 
records in separate files 
which are accessible 
through a common system. 
Utilising the day-to-a-page 
and week-to-a-page format 
adopted traditionally by the 
majority of printed diaries, 
OL Diary requires that a file 
be available in a drive to 
whicch data can be written. 
Where none is available to 
the system, when it is used 
for the first time, an 
initialisation procedure is 
used to produce a file to — 
which data can be written. 
Each time Diary is loaded, 
you are offered the 
Opportunity of setting the 
time and date for the QL 
Operating system and the 
diary insert mode. The main 
menu offers the options of 
viewing a page of three 
calendars, in traditional 
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QL Diary — Engagements in order of importance. 


available for home and 
business use. 

The two similar utilities 
reviewed offer slightly 
different features and cater, 
in common with their 
book-like counterparts, for 
individual preferences. One 
advantage of using electronic 
diaries is that it is possible 
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format, and altering them for 
either previous or suceeding 
months. Asub-menu on that 
page includes prompts for 
altering the calendar display. 
You are also offered the 
option of entering particular 
dates into the display 
command which could 
otherwise take too long to 


life and Easiness ae 


scroll through. 

Entering the week-per- 
page option, you can type up 
to two lines per entry, With 
that in mind, itis a good idea 
to limit weekly entries to 
basic information which can 
be obtained in detail from 
the daily pages. In common 
with the entire range of 
options, entries can be 
inserted, altered or deleted. 

When using the day-to-a- 
page feature you can enter a 
change of date which will, in 
turn, call up the page for that 
date. Complete editing 


facilities for this option are 


available, as well as the 
option of hard-copy prints 
from any of the other 
information pages. 

Short of switching-off or 
re-setting the QL, it is 
impossible to lose any 
changes made to entries. _ 
Whenever a page is 
completed or the QUIT 
option is selected, updating 
the data cartridge is 
automiatic. 

QOL Diary has an alarm 
facility which can be used as 
an appointment reminder 
for any future date and time 
and is activated each time it 
is run. When the alarm is - 
sounded, the message to 
which it relates is shown 
on-screen, 


Life and Business 
Organiser 

Gemini Marketing 
£14.95 


Taking a slightly different 
approach to information 
organisation, L.B.O. includes 





default categories for 
forthcoming, overdue, 
urgent and this week’s 
engagements, with the 
option of adding a range of 
categories for individual 
requirements. Page selection 
produces particular screen 
information related to each 
of the defined categories. 
Other differences are 
evident in the way 
information is handled for 
each date and category. Four 
options are available for 
each entry made and are © 
toggled on and off. 


DURATION: When on, 
requests for the length of 
the appointment in terms 
of morning, afternoon or 
the whole day. 

RANGE: Allows the 
automatic addition of a 
specified number of 
entries at regular 
intervals. 

TIME: Allows atime to be 
placed against each 
addition. 

EXPORT: Permits date to 
be exported for use with 
Quill or to a printer. 


Of special interest to users 
of the system, automatic 
searches for information 
may be made by text or date. 
Two pages have been 
included which show either 
a week-planner or a month- 
planner in a bar graph 
display. 

Overall, there is little to 
choose between either 
utility. They are both 
excellent programs in that 
they supply an efficient 
means of organising 
important engagements in 
the most efficient manner. 
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Nucleon 


: _ Pyramide — 
Sl 


One of the most exdune 


utilities Ihave examined, the _ 


- Pyramide Nucleon — 
incorporates a suite of © 


to produce windows, 
“music” — such as that of 


which the QL is capable — a 


- generator for character, 

graphic and icon fonts and 
memory-conserving 
graphics and includes the 
option of generating 


SuperBasic programs at the - 


end of each section for use 
_in your programs. 

Looking at the 
components of the system, 
the first routine is a program 
called The Integrator. 
Principally a file- 





_ on-screen message ‘loading 
- filename”. : 


Once a boot program is 
generated — 
automatically as a file to a 
designated drive — it can be 
edited in the usual way. 
The Nucleon Maestro 


utility is a delight to use. If 
routines which enable you — 


you are writing a program in. 


~ which you want to make the 


best use of the ability of the 
QL to make coherent music, 


_ as Opposed to the rude 


noises usually obtainable 
with the BEEP command, 
Maestro will enable you to 
represent the music 
graphically on ascore sheet. 
Each note, the repeat of the 
same notes in a single entry, 
its position on the stave, and 
pitch is entirely menu- 
selectable. 

Full editing, either for 
insertion or deletion, is 


Nucleon. Recommended for beginners and seasoned programmers. © 


-management front end, it | 
may be used in a ey of — 
ways. 

In addition to 5 the oe 
_ copy, delete - either total or 
selective — format or : 
_ directory 72 files at a time 
_ commands, there is a facility 
_ for re-name and wild-card 
copy or delete. You are 


2 offered the option 


- throughout of designating 
drive, either mdv, flp or hdk, 
as the default drive which 
_may be used, in any 
combination, as defining the 
source and destination 
drives. 

A command called 
boot_create will, through a 


series of questions, generate — 


a Basic boot program. 
Consistent with superb 
attention to fine detail, it will 
initiate file-loading 
procedures with the 


a included in the system. 


- Once a score is completed, 


— you will have the option of 

_ generating a file or a 

_ SuperBasic program for 
_later use. 


~ Characters, the N dleen 


| ioe generator, includes a 
number of sample character 
Sets. Full editing facilities — 


enable customised 


- characters to be produced. 
_and used in other programs 


as characters, icons or 


graphic symbols. The spray 


facility used in Compact 
Draw, as just one example, 
utilises the customised spray 
characters produced by this 
utility. 

A utility for designing 
screens, Windows includes 
options enabling any 
number of windows to be 
positioned on-screen. 
Sub-options define borders, 
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paper, ‘ink, shoes and 
- window identification. 


it will be ao | 


on complexity; add LOCK 


QL vocabulary to enable/ 
- disable the break function; 
_ create a CLONE program — 
. automatically; or assign font 
_ sets Or sprays to ses 


_ French original, my only — 

criticism of the manual is 
that it would benefit from _ : 
expansion of portions of the for testing combinations of 
instructions so that the full 
power of the program could _ 
be appreciated more fully. : 


The design process — 


character co-ordinates. 


- Border sizes, shadow size 
_and colour, as well as — 
background colour are also - 


user-definable. Once a 


Screen layout is completed, 


you May Save it as either a 
file or generate a SuperBasic 
program, for further © 
additions. 


The graphics component 


of Compact Draw is, as the 


name implies, a graphics 
program which produces 
space-saving drawings — 
from the point of view of file. 
size. Like the other Nucleon 
utilities, drawings may be 
saved as files or as 


_ SuperBasic programs. 


Additional Nucleon 
routines included in the — 
system permit a screen file 
of 32K to be compressed by — 
about one-third, depending 


or UNLOCK keywords tothe 


channels. 


T he ae states shat 
Nucleon is designed to be 
user-friendly and, in that, I 


must agree; it is both clear - 
_ and concise, 


Translated bos he im 


Nucleon is unusual. in a 


number of respects. It is one 
of the few programs 


available which will have a. 


universal appeal to users at — 


virtually any level of | 
experience. it is also one of 
the few programs which — 
makes programming power 
take on a new meaning. In 
summary, Nucleon is 
recommended 
wholeheartedly for 
beginners and seasoned 
programmers. 


OL Peintre 
2 . -‘Pyamide 
bree 


_ enables you to position each - 
window with either screen — 


~ cursor, pixel co-ordinates or _ 


The world’s heat bi-lingual 
graphics program, the 


Pyramide entry into the 


ever-expanding field of QL | 


graphics, QL Peintre, will 


give you a most impressive 
preview of its potential 


_ program power with its 
superb loading screen. 


According to Alex Gassman 
of Pyramide, it only took 
three hours to draw. — 

QL Peintre has | 
implemented a number of 
very useful features in its 
operating system, with help 


- prompts available at each of 


drawing and, during any 
complicated procedures, 
step-by-step instructions 
provided at the top of the 


_ Screen. 


Utilising single-key entry, 
access to the various 


commands is made with 


eight icons, nine labelled 
windows, solid re-colour 


_ palette patches, three 
_ ink-selection sampler 
windows and sensible 
=. prompts. 


-Rubber-banding has been 


: implemented with all 


auto-geometry; lines may be : 


_ bent into arcs; squares may 
_ be stretched or compressed | 
into rectangles; circles may 


be made elliptical. Other 
options include a wide 


selection of pre-defined 
_ brush sizes and types, with 
re-definable footprints, and 
may be used in either paint 
or spray modes. 


A doodle pad is available — 


— colours, sprays or line and 
pattern combinations, A 
large range of pre-defined 
_ texture patterns is available 
which may be either — 


modified or re-defined 
completely. Pan and scroll 
commands permit accurate 
re-positioning of your 
drawing. Another screen- 


_ handling options permits 
the complete screen to be 


rotated. 
The magnification option © 
opens a window on a 
quarter of the screen for 
positioning fine detail in a 
drawing. Work proceding in 
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| ioadedd into it. At t thar me 
_ you will have the option 2 ae 
policy. It is superb value ba 
_considering its many — 
advanced features, I feel that : 


selecting the area to be | 





_ drawing on screen 
_ accurately. — 


each new QL graphics _ 


Pe some 14, exhibits 
increasing sophistication - 


If the Pyramide ae 
reviewed so far are a 





— entify the ee oO 
_-area of the full-size drawing. i ch: 
_»*  Sub-options are a cili 
to each of the eS Se Nu 
modes, poe i 


ee filling ane! mixing - -XOR . he main program. When a 


_ over-painting of lines or _ drawing is completed, it is - 
__ Shapes, as opposed to 2 2 saved as afile; after re-setting 
_ over-drawing. The COPY _ the OL, the printer dump 
- command duplicates =~—_—s program is run and will ask 
selected areas of a drawing __ for the picture file to be 
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printed and pomones | the | 


Itisnottoo surprising ee 2 — under-priced. © 


a _ program, of which there are _ 


QL Peintre is no exception. _ 
a Nucleon, it is a difficult 
= combination to beat. — 
= criterion, it seems that it is ee - 


Pyramide, c/o Rio Promotions Ltd, 
London N3 NPX. Tel: 01-349 27 
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the program is somewhat 
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~ tool for producing | 8 
_ illustrations in which fine 
- dee is required; when 


used with the Pyramide _ 


Information 


Data Management, Clark House, The Village, Haxby, York} — 
YO3 8HU. Tel: 0904 760847 


Gemini Marketing Ltd, Gemini House, Concorde Road, 
Exmouth, Devon EX8 4RS. Tel: 0395 265165 
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PRO PASCAL & 
PRO FORTRAN-77: 


FOR SINCLAIR QL: £99.95 incl VAT 


USE THE LANGUAGES THE 
PROFESSIONALS USE: PASCAL AND 
FORTRAN. 

C is high on performance but low on safety, 
structure, portability and maintainability. 
Pascal is excellent for education and for long- 
term projects. Fortran gives you access to 
hundreds of existing programs — and uses 
established programming skills! 


ISO-PASCAL 

Pro Pascal is validated to ISO 7185 / ANSI 
770X3.97 Class A (no errors) on the Z80 
processor under CP/M and the 8088 
processor under PC-DOS. This provides a 
guarantee that the compiler is complete and 
works perfectly. 


FORTRAN-77 

Pro Fortran-77 is a full implementation of 
ANSI Fortran—77 with no omissions and 
many useful extensions. Validation is 
imminent. 


Prospero Compilers Work! 
No known bugs when we ship - so you don’t 
have to program around the holes. 


“Lazy I/O” for interactive use. 


Good Housekeeping 
All files closed on exit from procedure. 


Hand-coded library 
Produces compact and efficient programs. 


Ideal for 

e software developers 

* universities and colleges 

* government and industry 

e students of computing 

¢ development of personal skills 
¢ solving technical problems 

e training institutions 


Prospero 





Prospero compilers: 
portable source code 


16 digit accuracy 
Single and double precision IEEE format 
arithmetic gives 7 or 16 digit precision. 


50,000 Lines Big 

Compiles big programs >50,000 lines... 
>5,000 identifiers...Separate compilation to 
build libraries and massive program suites. 


Compilers include 

° compiler 

e linker 

¢ run-time libraries 
e librarian 

e X-ref program 

e sample programs 
e 200+ page manual 
e graphic subroutines 


Pascal «—» Fortran 
Interlinkable code means you can use the best 
of both languages. Ask for details. 


We Specialise 
At Prospero we specialise in writing language 


compilers. We produce the best possible 


compilers, conforming to the appropriate 
standard, and giving programmers a secure 
base on which to build. 


Quote: “Pro Pascal is not only ISO- 
validated, it is also a superb-quality and very 
full software development tool.” Personal 
Computer World Nov 1985 


Prospero compilers are used at more than 
6000 sites around the world. 


Software 


y, LANGUAGES FOR MICROCOMPUTER PROFESSIONALS 
190 CASTELNAU, LONDON SW13 9DH, ENGLAND TEL 01-741 8531 TELEX 8814396 L.———____________ =] 


It’s easy to order! 
Credit card holders phone 01-741-8531. 
Mastercard, Visa, Diners & Amex accepted. 


_ Prospero's compilers are also available from 


good software dealers and -distributors 
worldwide. 


Reviews & Info 
Call 01-741 8531 or write in for a free info 
pack with datasheets and magazine reviews. 


a... % 
New: Pro Fortran-77 for MS-DOS will be 
available in August/September 86. 


Software distributors 
Contact us for our Worldwide Distribution 
Guide. 





Mail order service 

Send this coupon with cheque to Prospero 
Software Ltd, 190 Castelnau, London SW13 
9DH, England. Add 15% VAT in UK or £5 
shipping outside UK. Allow 28 days for 
delivery. 

Please supply (enter number required): 

____ Pro Fortran-77 for Sinclair QL at £86.91 
_____ Pro Pascal for Sinclair QL at £86.91. 
Also available: 

Pro Fortran-77 for Atari ST at £129. 
Pro Pascal for Atari ST at £129. 

Pro Fortran-77 for MS-DOS at £420. 
Pro Pascal for MS-DOS at £320. 
_____ Pro Pascal for CP/M-86 at £320. 
Special offer till 1/10/86: both QL compilers 
for £162. 

I enclose payment of £ , 


SOOTHE TEETER EEE EEE HEHEHE HE EHEEEHEEEEEEEEETHEHEEE HE EEEE 


7 Telephone NOs cscidecis0es es. 5s stesesseas scacteweswees 
In case of query call 01-741 8531 or telex 

| 8814396. Tick product name if you just require 

| information! QLW 9/86 


Our QL expert 
Colin Opie finds 
the answers to 
your technical 






problems. Write to: 
| Technical Helpline 
Sinclair QL World 
79-80 Petty France 
London SW1H 9ED 


It is perhaps a little 
unfortunate that the 
program used the keyword 
‘FOP_IN’ as that is a toolkit 
extension to SuperBasic. If 
you have no toolkit of any 
kind you clearly will not be 
able to use the function. 

There are a number of 
ways we can circumvent the 
problem and we shall 
explore a few of these 
avenues. The use of the 
keyword ‘OPEN_IN’ I 
suspect was inappropriate 
| and therefore it appeared 
not to work. Before going on 
to obtain a solution to the 
query, let us first make sure 
we know that ‘FOP_IN’ and 
‘OPEN_IN’ are and what 
exactly it is they do. - 

The SuperBasic extension 
‘FOP_IN’ is a function which 
will return an integer value 
representing an error 
condition. As we all know, 
SuperBasic has no real 
error-trapping facilities and 
so if you try to open a file 
for input, and the file does 
not exist, your program will 
halt abruptly. It would be 
better if some mechanism 
existed which would enable 
us to look for a file and tell 
us, under program control, 
whether the file existed or 
not. That is what ‘FOP_IN’ 
does. In Charles Dillon’s 
program, line 27 contains 
the statement: 


LET wrong = FOP_IN 
_ (#5, ipfil$) 


The string variable ‘ipfil$’ 
contains the name of the file 
you want to read. If the file 
exists, ‘FOP_IN’ will perform 
an implicitly ‘OPEN_ 
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Having recently lost some 
Archive files, painstakingly 
we listed the program 
printed in the January/ 
February edition of OL User. 
When we ran the program it 
came to a halt in two places 
— lines 27 and 372. Those 









keyword “FOP_IN”. 
Our version of the QL 








IN#¥5,ipfil# procedure call 

and return the value zero — 
signifying no error — to the 
variable ‘wrong’. 

If the file does not exist, 
no attempt will be made to 
open channel five and a 
(negative) error number 
will be assigned to the 
variable ‘wrong’. The effect 
then is to obtain a sensible 
check, under program 
control, for the existence of 
a particular file. 

Replacing the function 
name ‘FOP_IN with the 
procedure name ‘OPEN_IN’ 
clearly will not work. Why? 
Because ‘FOP_IN’ is a 
function which will return a 
numeric result. As such it 
must exist within an 
expression. ‘OPEN_IN’ is a 
procedure which attempts 
to opena channel toallowa 
specified file to be read. it 
does not return a value, it 
cannot be used in an 
expression, and it must form 
the basis of a SuperBasic 
statement in its own right. It 
is important that we 
understand the difference 
between a function and a 
procedure call. For example: 
These are incorrect: 

30 x = OPEN_IN#5S, fyle$ 
30 FOP_IN (#5,fyle$) 


Archive on the mend 


two lines have the common 





seems to recognise “FOP_ 
IN” as a keyword but does 
not know what to do with it. 
We have many toolkits and 
we have tried using 
“OPEN_in” but that does not 
seem to have the desired 
effect. 


A.B. James 
Newport Pagnell. 


These are correct: 
30 OPEN_IN#5,fyle$ 
30 x = FOP_IN (#5,fyle$) 


When deciding whether 
or not a keyword is 
recognised, a further point 
must be noted. We know that 
SuperBasic always lists 
known keywords in 
upper-case letters. If you 
type-in a listed SuperBasic 
program exactly as it is, 
SuperBasic will not convert 
keywords, typed in upper- 
case, to lower-case if it does 
not recognise the keyword. 
As such you could be fooled 
into thinking that your 
machine recognises the 
keyword, when in fact it 
does not. The best way to 
type-in listed SuperBasic 
programs is always to use 
lower-case and let 
SuperBasic convert that 
which it knows about to 
upper-case. 


So much for that. Now let 
us consider some solutions 
to the problem. The simplest 
solution, of course, is to 
replace the ‘FOP_IN’ 
function call with an 
‘OPEN_IN’ procedure call 
and hope that the file exists. 
That would imply that we 
can do no checking and 








§ therefore the two parts of 


Dillon’s program would 
have to be converted as 
follows: 

27 OPEN_INSS, ipfil$ 
28 EXIT if loop 

and 


_ 372 OPEN_IN#7,yn$: 


wrong=0 : file_ip=1 

That is all very well but we 
have now returned to 
standard SuperBasic which 
will stop with a fatal error at 
every conceivable 
Opportunity. Assuming we 
have no toolkit, we could 
implement our own 
‘FOP_IN’ function. That still 
has limitations, however, 
because we cannot use it to 
check if file which we wish 
to open for writing already 
exists. There are other 
checks we may like to 
perform as well, for example 
whether or not the disc or 
cartridge is write-protected. 

The program in figure 
one will provide a 
SuperBasic extension which 
fulfils all our needs in this 
respect. Type-in the 
program and save it on a 
cartridge or disc. Whenever 
you run the program the 
function ‘DEVSTAT’ will be 
added to SuperBasic. Clearly 
you need to run the program 
only once each time the QL 
is switched on or re-set. The 
function expects a single 
string argument, as follows: 
30 status=DEVSTAT(devfile$) 
The string variable ‘devfile$’ 
will contain the file name for 
which you wish to check — 
e.g., mdvl_prog1, mdv2_ 
demo, and so on. DEVSTAT 
will return a numeric result 
having the following range 


Sinclair/QL World September 1986 








Slave QL 


The low cost of the QLs now 
on sale prompts me to 
consider buying one as a 
back-up for my present QL. 
Rather than having a spare 


QL sitting idly by, awaiting a 
catastrophic failure of my 
main machine, I wondered 
if it would be possible to set 
it up as a printer driver/filer? 


I envisage an arrangement 


where I can send files to be 
printed or SAVED on a slave 


of values and interpretations: 
0 (or +ve) : Name given is 
legal, and file does not yet 
exist. 
-3 or -6 f Out of memory. 
-7 : Cartridge or disc is not 
in drive, or the device name 
is unknown. 
-8 : Name given is legal, and 
file does not exist. 
-9 : Device is in use, and 
cannot be acessed yet. 
-20 : Cartridge or disc is 
write-protected, i.e., in 
read-only mode. 

This is of great benefit to 
us. Using this function 


Figure 1. Devstat loader. 


QL, allowing uninterrupted 
use of the master QL. Most 
of my time is spent using 
Archive, Quill and Abacus, 
so I would like to be able to 
use such a facility from those 
packages. 

Would the much-derived 
network cable be of any use 
in such an application? 


Alan Jarvis 
Beaconsfield, Bucks. 





28 <delete this line> 

and 

372 file_ip=1: IF DEVSTAT 
(yn$)=-8: OPEN_IN#5,yn$: 
wrong= 
0:ELSE:wrong=-7:END IF 


Note that DEVSTAT 
cannot perform an implicit 
OPEN_IN like the FOP_IN 
toolkit extension because it. 
does not know whether you 
are checking for an input 
file, an output file, or just a 
valid device name - e.g., 
and so on. 

There is no doubt that the 


DATA 67,250,0,12,52,120,1,16, 78, 146 


DATA 102,4,83,67,103,4,112,241, 78,117 


DATA 114,255,112,1,78,66,34, 70,211,196 


100 REMark DEVSTAT. Loader 

110 REMark (c) C.Opie 1986 

120 : 

130 base=RESPR(120) 

140 FOR m=0 TO 113 

150 READ x:POKE baseta, x 

160 END FOR o 

170 CALL base 

180 STOP 

190 

200 

210 DATA 112,0,78,117,0,0,0,0,0,1 

220 DATA 0,12,7,68,69,86,83,84,65,84 
230 DATA 0,0,52,120,1,22, 78,146, 74,128 
240 

250 DATA 65,246,152,0,46,8,44,9,66, 132 
260 DATA 56,16,86,68,2,4,0,254,118,2 
270 

280 DATA 44,9,58,0,102,10,112,2, 78,66 
290 DATA 32,71,112,4, 78,66, 34, 70,85, 73 
300 DATA 61,133,152,0,120,3,45, 73,0,88 
310 DATA 112,0,78,117 


means that we can test for 
any file or device in any of 
our programs and keep 
control within the program. 
Returning again to Dillon’s 
now continue error- 
checking by re-writing the 
program with: 

27 IF DEVSTAT (ipfil$) =-8: 
OPEN_IN#5, ipfil$: 

EXIT if_loop 


use Of DEVSTAT is preferred 
to removing error-checking 
from a program. Perhaps 
readers will be encouraged 
to use this extension in their 
programs so that toolkit 
owners and non-owners 
alike can share programs 
which cater for error- 
checking on files and 
devices. 


There is no reason why two 
or more QLs may not 
communicate via the 
network ports. Standard 
SuperBasic is a little limiting 
in the way it allows you to 
use those ports but 
proprietary extensions exist 
if you wish to improve this. 
When we talk of a network 
we are referring to a group 
of QL machines coupled 
loosely using the network 
cables. Each QL on the 
network should have a 


distinct station number. 
When a QL is first switched- 
on, or re-set, it assumes itself 
_automatically to be network 
station 1. The procedure 

. ‘NET n’ is used to assign a 

. different station number toa 
-QL. The value of ‘n’ should 
‘be between 1 and 63. 


If we had two QLs we 


could leave one alone and 
set the other to, say, station 
_2.To communicate between 
_machines a network channel 
_needs to be opened on each 
communicating QL. A 
transmitting QL requires an 
“Output channel and a 
‘receiving QL requires an 
input channel. 


When the channel is 


opened it is possible to 
specify the exact station to 
which the data is to be 
written to or read from. For 
_example, if we were using 
. stations 1 and 2 we could use 
‘station 2 as a printer buffer 
‘QL by using the followin 
code: , 


100 REMark NETwork spoo 
ler 

110 NET 2:base = RESFR( 
IQ000) 

120 REPeat spooler 

130 i=base: OPEN#3,neti_ 
: 

140 REFeat loop 

150 b=CODE (INKEYS (#3, -1 
})sPOKE i,bsi=1+1 

160 IF b=26:EXIT loop 
170 END REFeat loop 

180 CLOSE#3: i=base: OFEN 
#2,serl1 

190 REFeat loop 

200 b=FEEER (i): IF b=26:E 
XIT loop 

210 FRINT#3, CHR (b)5:1i= 
+1 

220 END REF eat loop 

230 CLOSE#3 

240 END REFeat spooler 


The size of the spooler 


_buffer is given by the RESPR 


statement. Ifthe transmitting 
Station is not station 1, it 
would be simple to change 


the station reference in the 
NET_I statement in line 130. 
If we wanted to spool a file 
from transmitting station 1, 
we could enter the code: 
copy MDV1_myfile to neto_2 
open#3,neto_2:print#3, 
chr$(26);:close#3 


The first line sends the 
file. The second line sends 
the control code being used 
to tell the spooler we have 
finished. It is important that 
the spooler station is 
running the spooler 
program before we try to 
send anything to it. It is also 
important to close the 
neto_2 channel to force all 
the data to be send. Data is 
normally sent across the 
network in 255-byte blocks. 
If we do not close the 
channel, the control code 
will not be sent. 


We can improve on that 
system by making it more 
general..Ifa receiving station 
opens a NETLn channel, 
where ‘n’ is the receiving 


_station’s number — i.e., not 


the number of the 
transmitting station — the 
station will collect data 
satisfactorily from any 
transmitting station sending 
data to it but not to other 
receiving stations. 


You can also go into 
broadcasting mode. In that 
mode the transmitting 
station can broadcast data to 
more than one receiving 
station. To do that, open a 
channel using station 
number 0 —the broadcasting 
station. YOU must not assign 
a QL to that station number, 
simply open a channel using 
NETO_O or NETIL_O as 
appropriate. 


That is the sum of the 
facilities afforded normally 
under SuperBasic. If you 
wish to have much-improved 
network handling I can 
recommend Tony Tebby’s 
Toolkit II, available from 
QJump or Care Electronics. 
That ROM, among 
hundreds of other things, 
provides enhanced network 
facilities including buffer 
size specifications, proper 
file-server Operations — e.g., 
open a window on another 
QL screen — network hiding, 
I/O device sharing and © 
messaging. 


PUZZLE PAGS 





i fed the cat as 
many times as possible — and 
myself even more. The time 
definitely arrived to devise a 
puzzle page. I braced myself, 
then sat down resolutely to 
see what was on television. 


Eventually, I had to admit 
that I would not be able to 
think of some unusual idea 
for this month’s page. So, 
instead, I offer a very simple 
program to solve a very 
simple and well-known 
problem. It is shown in 
figure one. It is programmed 
very badly. Rather than using 
meaningful identifiers, I 
have used single letters. I 
found that rather confusing, 
too, and I have made a 
number of minor errors. 
Nothing serious, but the 
program does not work. 

What I would like you to 
do is decide where the 
errors are and put the 
answers On the entry form. 
In all cases the error can be 
corrected by substituting 
one indentifier for another. 
There are five mistakes in all. 

If | was feeling generous I 
could tell you what the 
program is designed to to. 
Unfortunately Iam not. One 
clue I will give is that 
PROCedure ‘g’ is the display 
procedure. You probably 
gathered that because of the 
PRINT statement. Anyway, I 
happen to know that 
procedure contains no 
errors. 

When filling-in the entry 
form, answers such as: 

Line 100. From a To b 

will suffice. In this case, you 
would be indicating that line 
100 should read: 

100 b = 1 

This month’s solution 
should require no 
programming, other than 
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the one I have given you. 
Once you have worked out 
what the program is 
designed to do, I would be 
interested to see any other 
elegant solutions to the 
problem — the shorter the 
better. 


RULES 


All entries must be 
written on the panel 
provided on this page. 
Any other form of entry 
will be disqualified. 

Entries must be sent by 
post to: 

PUZZLE PAGE, 
Sinclair QL World, 
79-80 Petty France 
London SW1H 9ED 

to arrive no later than 
Monday September 15, 
1986. 

The winner will be the 
first Correct entry drawn 
from the editor’s hat. If 
nobody submits the 
correct alterations, the 
winner will be the person 
with the nearest answer. 

All entries will be 
judged by the Editor of 
Sinclair QL World. The 
editor’s decision is final 
and no correspondence 
will be entered into 
regarding the result. 


= S SS Se SS SS SS 


| ENTRY FORM 


| Errors are: ( 
[ 1. Line . From To i 
2. Line . From To : 
H 

; 3. Line . From To 
: 

f 4. Line . From To ( 
i 5; bine . From To : 
} 

i Name: k 
: Address: ! 
j 
i 
baie aX: 


Figure 1. 


100 a 

LPOrb 

120 cz=a 
130 d(b) 
140 REPeat e 





150 IF c = a + ¢ THEN EXIT e 


160 £ 

170 END REPeat e 
180 ¢ 

190 : 


200 DEFine PROCedure f? 


210 aCe) = de). +.28 


220 z 
230 END DEFine f 
2u0 : 


250 DEFine PROCedure g¢g 


260 FOR c = a TO b 


270 PRINT POWs og th Merit cert it 


280 END FOR e¢ 

290 END DEFine g¢ 
300..% 

310 DEFine PROCedure 
320 IF d(ec) = a + 
330 i 

340 ELSE 

350 zg 

360 END IF 

370 END DEFine h 

380 .: 

390 DEFine PROCedure 
Loo atc) = Bb —]26 
410 e=c-a 

420 END DEFine i 

430 : 

440 DEFine PROCedure 
450 kK 

460 IF 1 = a THEN 
470 END DEFine j 

480 3: 

490 DEFine PROCedure 
500 7 See 


510 FOR m= 1 TO ‘e 
aCe) “THEN °I*'= °0 

d(c) —- d(m) THEN 1 
d(m) - d(c) THEN 1 


520 EF d(m)* = 
530 IF c - m 
540 Doe t=" = 
550 END FOR m 

560 END DEFine k 





SOLUTIONS 


The Doodle Puzzle did not 
seem to confuse many 
people. The solution can be 
built as a tree-like structure, 
as shown in figure 2. This is 
simulated in the program — 
figure 3 —by an array (pos$) 
and the pointers (pointer% ) 
which build a tree structure, 
as shown in figure 4. When 





= 


solving the problem, the 
program produces all the 
possible moves from the 
‘present’ position and each 
move is added to the tree, 
with a pointer to the next 
move generated. 

By working through this 
linked list of positions, the 
program ensures that all 
positions are generated in 
order. 

When generating those 
moves, the program must 
check to make sure that no 
position is duplicated. For 
instance, one of the moves 
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be anee~ -ee~ 


SS 


ARRINeecoas. 


This month our 
resident problem 
poser Marcus 
Jeffery challenges 


produced from the home 
position is “5124673” — using 
move ‘A’ complete 
clockwise. From that 


you to correct the 
errors ina 


program listing. 


SOLUTIONS 








algorithm. 

One fairly efficient 
hashing algorithm is to use 
the position as a seed for the 


1234567 


Figure 4. 


1234567 


5124673 ——> 2374156....—»1237456 


——————— 


6514732 ——> 1234567 ——4512673.... 


> aN 


5124673 


ao 


6514732 


position, move ‘B’ — 
complete anti-clockwise — 
will produce the result of 
“1234567”. Obviously, that 
must not be added to the 
table, as it already exists. 
Therefore whenever a new 


Figure 3. 


DIM poss(7992, 7),distancex%(7992), pointer%®(7992),space%( 333) 
count = 1 
spaceX%(slot)=1 : 
last_used = j + 


true = -1 false = 0:3 
ieeaieapabse7) : 
present = j +1: 


REPeat build tree 
expand tree 


1234567... 


2374156... 


os 


1234567 3764215... 





QL RANDOMISE statement. 
If you have sufficient 
memory for an array of, say, 
18,000 to 20,000 elements, 
using the statements: 
RANDOMISE position 
table_entry = RND 


pos$(j+1)="1234567" 
i 


IF count = 5040 THEN EXIT build_tree 
present = pointerxX(present ) 


END REPeat build tree 
find_level("6245173") 
find _worst_case 


REMark 


DEFine PROCedure eae tree 


FOR mov = 1 TO 


new_pos$ = Peoe tha poadicvesahts) 
IF NOT used(new_pos$) THEN 


Space%(slot) = spacex(slot) + 1 
pos$(j+1) = new_pos$ 
pointerxX(last_ used) a ae ome | 

1 


last_used = j 
distanceX(last Gee = distanceX(present) + 1 


count = count + 


END IF 
END FOR mov 
END DEFine expand_tree 
REMark 


DEFine FuNction maps (x,x$) 
SEL 


ect ON x 
ess nS 


position is generated, all the 
previously-generated 
positions must be checked 
to ensure that it does not 
appear twice. 

One way would be to 
check all the previously- 
generated positions — there 
can be a maximum of seven 
(= 5040) of these, so this 
could be slow. Another 
method is to use a hashing 


"5124673" 
"2374156" 
"4123567" 
yooee eo ke 
"123567 

Nia37h oe" 


(1 TO 20000) 

you will have very few 
collisions. The smaller the 
table, the more collisions 
you can expect, and the 
longer the program will take 
to run. 

The method used in the 
program in figure three is to 
utilise the first three digits as 
a ‘slot’. number. Each slot 
must have room for all 
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combinations of the other 
four digits in the number. 
First, one is subtracted from 
each of the first digits and 
base seven is used to give a 
result. For the highest first 
digits —i.e., “765” —this gives 
the maximum slot equal to: 
(49""C7-1)) (6-1) + Ge 
(5-1)) = 333 slots 

That is the value given to 
the size of the array ‘space%’ 
which keeps a note of the 
next empty location in each 


ys = eee 
FOR i = i TOr? 
RETurn y$ 
END DEFine map$ 
REMark 
DEFine FuNction use 


i = 24 *® glot : 
FOR kK = i TO 


END FOR k 

RETurn false 
END DEFine used 
REMark 


PRINT 
IF used(x$) THEN 
PRINT 


ELSE 
PRINT “Error. 
END IF 
END DEFine find_level 
REMark 


FOR *1) #2 'TOef 992 


position$ = 
END IF 
END FOR i 
eR INT "Worst case = 


RINT ** requires : 


CONNNNNANNNNSNDAOAAGD Qannnvnwuwy 
FOW ONAN EWNFOORDNOW FWNrOOW mM 
O0O00000000COCCO0C0C0O0 oco000c000D 


slot. Each slot must have 
room for four (= 24) 
entries. That gives a total 
array size of: 
333 * 24 = 7992 entries 
and a redundancy of: 
100 * ((7992/5040)-1)=58.6% 
If you find you have 
insufficient memory for 
these arrays, change the 
main array values to 5640 
and the number of slots in 


largest_distance = 0: 





the ‘space%’ array to 47. 

That gives smaller arrays — 
redundancy = 11.9% — but 
there are now 120 entries in 
each slot. Line 530 should be 


changed to: 
530 slot = 7 *(x$(1)-1) + 
(x$(2)-1) - 1 


and the value in line 730 
should be altered to 5640. 
The number of moves 
required to reach the home 
position from “6245173” is 
five. The worst possible 


ys & x$(m$(i)) 


7*(x$(2)-1) + an 2 he PP) =z 
+ spacexX(slot) - 


J 
IF x$ = pos$(k) THEN RETurn true 


DEFine PROCedure find level(x$) 


x$;:"' requires ";:digstancex(k);" moves 
to reach home." 


Tree not fully expanded." 


DEFine PROCedure find_worst_case 
PRINT 


positions = "1234567" 


IF distanceX¥(i) > largest_distance THEN 
largest_distance = distancex(i) 
pos$(i) 


;position$s 


"ss largest_distance:" moves." 
END DEFine find_worst_ case 





starting position is “3214765” 
which requires 10 moves to 
reach the home position. 
There are no other positions 
which require so many. 

One person who 
suceeded is D. Bloomer of 
Neasden, London who is the 
winner this month and will 
receive a year’s free 
subscription. 
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| Forth feature, 
_ Charles Gerrard explains 
the theory behind looping. 





M, efore moving to other 
© constructs, after working in 
m last month’s article at how 
| conditional statements are 

meee formed in the’ Forth 
language, it may be helpful to look at a 
more detailed example of the IF. . THEN 
statement. Let us return to our original 
problem of printing-out any monetary 
sum. 

You may remember that the major 
difficulty occurred when trying to print 
monetary remainders — i.e., pence — of 
less than 10. Instead of being shown as 
‘03’, they were displayed as ‘.3’. Using 
the condition statement, we can now 
do this properly. The final version looks 
like: 

-GPRINT 100/MOD..” 2" 1..R.° DUP 
SS IPs ELSE.” OF... ENDIF? 

Points to note are that it is written using 
Computer One Forth, so the THEN ap- 
pears as an ENDIF. The °.R’ which we 


used previously also prints-out the ~ 


number, so there is no need to perform 
the operation afterwards, hence the 
missing dot. The new command ‘DUP’ 
duplicates the entry at the top of the 
stack. That is necessary so that the dup- 
lication can be used in the test “is the 
value greater than nine”, creating a flag 
and destroying the duplicated entry. The 
flag is then removed from the stack by 
the IF command, leaving the. pence 
value to be printed either with or without 
a leading zero. 

If you try this, you will probably have 
a problem using large numbers where 
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they suddenly become negative. That 
is due to the limited range of the signed 
integers we are using. Computer One 
Forth, and many other implementations, 
allow access to double-precision num- 
bers and so on. 

For anyone wishing to try example 
programs while following this series, we 
will be using Computer One Forth 
throughout, though Forth is _ fairly 
standard and should easily transfer to 
any other system without modification. 
Remember that Computer One Forth 
uses ENDIF rather than THEN. There 
will be a few other minor differences be- 
tween implementations but they are 
usually simple word substitutions or very 
minor changes in the syntax of the 
language. 

We will now look at a number of loop 
structures available in Forth. One of the 
most common looping structures found 
in Basic is the FOR. . NEXT loop, known 
as FOR ... END FOR in SuperBasic. 
Forth has an equivalent statement but, 
as you might expect, it looks rather 
different: 
finish start DO {body of loop} LOOP 

The ‘finish’ and ‘start’ indices are 
placed on the stack. The DO removes 
them, places them on the return stack, 
and the body of the loop is executed. 









The LOOP command then increments 
the index and returns the DO statement 
if the index is less than the finish index. 
Otherwise, execution continues after 
the LOOP statement. 

A few conclusions can be drawn from 
the description. First, tt should be noted 
that the loop always executes at least 
once, because the test is not carried-out 
until the LOOP statement is reached. 
Second, note that the loop will terminate 
when the two values are equal. There- 
fore if you wanted a loop to operate on 
all the values from ‘1’ to ‘30’ inclusive, 
the initial ‘finish’ index should be set to 
Re 

In some versions of Forth, the DO re- 
quires the loop variable to follow it. So 
the structure in this case would be: 
finish start DO index 
{body of loop} LOOP 
In Computer One Forth, the index of the 
first, or outer, loop applicable only when 
loops are nested — is assumed to be ‘I’. 
Therefore if you were to write the sequ- 
ence: 

“ GhOOP 16 1+ DO.l ).LOOP GR: 
and then type CLOOP, you would get 
the result: 
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1:2:3°4.5 67-89 109412 13844 AS 
ok 

The body of the loop retrieves the 
loop index, |, and places it on to the 
stack. The dot then prints that and the 
loop continues until the index equals 16 
— the finish index. The ‘CR’ after the 
LOOP command just executes a Car- 
riage return. 

At present, the loop always incre- 
ments by one but, as with the STEP 
command in SuperBasic, Computer 
One Forth has a special incrementing 
loop. This looks like: 
finish start DO {body of loop} increment 
+.OOP 
So, if we were to change the above de- 
finition of CLOOP to be: 

: CLOOP 16 1 DO! . 2+LOOP CR ; 
we would get the result: 

Io SO 11.13 15 

ok 

You can, of course, use negative incre- 
ments, as in SuperBasic. Even the loop: 

7) GLOOP 16-1 DO. ..-2 +1.OOP GR; 
eventually will terminate. That is due to 
the wraparound effect of the twos-com- 
plement numbers used. This loop will 
finish only when it has gone all the way 
through the negative numbers, wrap- 
ped around to the high positive num- 
bers, then decremented to 21, 19 and 
ie 

In many basics, it is possible to termi- 
nate the loop ahead of time by jumping 
outside it. Most Forth implementations 
will also have forced termination of this 
form. The Computer One DO . . LOOP 
will terminate at the next test if previously 
it has encountered the word LEAVE. 

There are a number of other loops 
which you are likely to meet. Though 
the exact syntax of them may change 
slightly from one implementation to the 
next, the following description of the 
loops available in Computer One Forth 
is fairly standard. All the other looping 
structures can be recognised because 
they start with the word BEGIN. First, 
there is the infinite loop. It follows the 
form: 

BEGIN {body of loop} AGAIN 


The only way this loop will terminate is 
via an error condition, or a termination 
such as ABORT or QUIT. For instance, 
this form of loop could be used to check 
for key input, say, of a “Y’ or ‘N’ for YES 
or NO. Combining the BEGIN . . ELSE 
with nested IF .. ENDIFs, the definition 
would be something like: 

: YESNO BEGIN KEY DUP 

89 = IF. “YES” ABORT 


ELSE 

78 = IF. “NO” ABORT ENDIF 
ENDIF 

AGAIN CR; 


That construct would continue loop- ° 


ing until either the ‘Y’ (code 89) or ‘N’ 
(code 78) keys were pressed. The only 
new word used here is KEY, which waits 
for a key to be pressed, then places its 
ASCII value on to the stack. 

The DUP instruction, to duplicate the 
top value of the stack, is necessary for 
the second IF test. If the answer is not 
‘Y’, the second IF loop is reached but 
by that time the initial value placed on 
the stack by KEY will already have been 
destroyed. The ABORT command will 
clear the stack, so no values — such as 
the duplicate — will be retained, even if 
the “Y’ key is pressed. 

Probably a more useful-looping con- 
struct of this form is the BEGIN .. UNTIL 
loop, which takes the form: 

BEGIN {body of loop} flag UNTIL 

In this instance, the loop body is exe- 
cuted until the ‘flag’ returns true —i.e., 
a non-zero value — at which point execu- 
tion continues after the UNTIL word. 
One example of this, given in the Forth 
manual, will wait until the ENTER key is 
pressed: 

: TEST BEGIN KEY 10 = UNTIL; 
Adding two words, including EMIT, 
which will print the character of the 
ASCIl value from the top of the stack, 
will give: 

“TEST BEGIN: KEY. DUP LEMIT-t0: = 
UNTIL ; 

In that case, all the characters will be 
displayed, including the ENTER 
(carriage return) which will terminate the 


loop. 


Table 1, Computer One double number extensions. 


Double number 
command 
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Single precision 
command 


Meaning 


Remove value from stack 
Duplicate value at top of stack 
Multiply values at top of stack 
Add values at top of stack 
Subtract values from top of stack 
Print value from stack 
These are all simple 
comparisons but working 
on double numbers 


Converts a signed single number 
toa double 





The final loop structure is the most 
complex to use but can prove very use- 
ful in certain situations. It takes the form: 
BEGIN {main body} flag WHILE {condi- 
tional body} REPEAT 
The main body of the loop is always 
executed. The flag is then tested and, 
if true, the conditional body of the loop 
is executed and control continues after 
the BEGIN, repeating the main body, 
and so on. 

If the flag is false — i.e., Zero — control 
passes to after the REPEAT word. For 
instance, if you were testing the user’s 
response for the correct letter, say, in 
multiple-choice questions, this con- 
struct could be used. If we assume that 
‘A’ is being tested for, then: 

: TEST BEGIN. “lease hit a letter A, B, 
C or DS GRAKEY 65<> 

WHILE. “No, that is the wrong answer” 
CR 

REPEAT. “Yes, that is correct” CR; 
would suffice. 

There is one final construct which we 
consider. It is the Forth equivalent of the 
SuperBasic SELEC command, which 
gives the computer a choice of options, 
based on a single parameter, and takes 
the form: 
parameter CASE 

value1 OF {body of 1} ENDOF 

value2 OF {body of 2} ENDOF 

value3 OF {body of 3} ENDOF 
value3 OF {body of 3} ENDOF 
value3 OF {body of 3} ENDOF 
valueN OF {body of N} ENDOF 
{default clause} 

ENDCASE 
For instance, the YESNO construct 
could be re-written as 
: YESNO BEGIN 

KEY CASE 

89 OF . “YES” ABORT ENDOF 
78 OF . “NO” ABORT ENDOF 

. “Please hit Y or N” CR 
ENDCASE 

AGAIN CR; 

You will notice that it is not necessary 
to duplicate the key entry for the second 
test, as in the original example. Another 
variation on the theme would be to en- 


_ sure that the ‘Please hit Y or N’ message 


was printed at the beginning. Rather 
than duplicate the message at the start 
of the construct, we could change it to: 
: YESNO 0 BEGIN CASE 
89 OF . “YES” ABORT ENDOF 
78 OF . “NO” ABORT ENDOF 
. “Please hit Y or N” CR 
ENDCASE KEY 
AGAIN CR; 


The KEY is not checked for until after 
the ENDCASE, which will occur only if 
neither of the ASCII values for Y or N 
are at the top of the stack. The zero 
before BEGIN ensures that will be the 
case on the first execution of the loop. 
Therefore the message is printed. 
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If you have been trying any of these 
examples, and in particular the monet- 
ary example, you will have noticed a 
problem with some numbers. They ap- 
pear to go out of range very easily. The 
_Single-precision numbers we have been 
using have a range of -32768 to 32767. 

If we are willing to sacrifice negative 
numbers we can alter the range to O to 
65535. Most implementations allow that 
and there will be a range of additional 





command words. For instance ‘U.’ is 
the unsigned equivalent of ‘.’, and will 
print-out an unsigned number. So if you 
were to type-in the expression: 


‘ADD 11111 22222 + DUP.CR.U CR; 
you would get the result: 
-32203 
33333 
Ok 
where the second number is the 
unsigned equivalent of the first. Other 
additional operations include ‘U.R’ for 
“R’ and ‘UK’ for ‘{’. 

lf that range is still not sufficient, dou- 
ble-precision numbers can be used. 
That increases the range still further, 
giving -2147483648 to 2147483647, 


and each number requires four bytes 
on the stack. If we wanted to add two 
double-precision numbers, it is possible 





that they may be fairly small — well within 
the single-precision range. Therefore 
just typing them, as we have been 
doing, will stack them as single preci- 
sion. The way round this is to include a 
dot in the number. It does not matter 
where you place the dot. Both: 


1.284 D. 
and 
12:34 D. 


will give the answer 1234 but it seems 
sensible always to place the dot at the 


) end of the number. 


As with unsigned numbers, there is 
a range of special commands for 
double-precision numbers. Some of 
them, corresponding to other com- 
mands we have used are shown in table 
one. 

Anyone using the Computer One 
version of Forth need not worry about 
the floating point commands. 

Next month we will develop a 
complete worked example of a more 
complex program. To be consistent and 
to permit comparison with the previous 
Lisp series, this example will be the 
Knight’s Tour of a chessboard. If you 
are feeling adventurous, you might like 
to try this before looking at next month’s 
program. You are likely to be surprised 
at how much quicker Forth is than 
SuperBasic and especially Lisp. 


MPC Software 


Asembler Workbench 
BJ The Return 
Cad Pak 


NOW 
THE SINCLAIR QL 
HAS OUR 
FULL SUPPORT. 


Decision Maker 
Entrepreneur 
ah (Computer One) 


Lands of Havoc 
Mortville Manor 
Print Spooler 

QL Peintre 

Scrabble 

Steve Davis Snooker 





Spook 
Super Arcadia 
Supercharge 


SSSSSSsRessssssssssss 


Phone for details of Impacct Accounting System 
Buy 4 more programmes and get any listed book up to the value of £5 FREE. 


Hardware 


Expandera 

Cumana Disc F ‘ Single drive 

Centronics Printer Interface 

Insider Board & Single drive 

Microvitec 1451DQ3 Monitor 

Arcade Joystick 

Cheetah 125 Joystick 

Eidersoft Mouse (ICE + Artice free) 
Branded, Guaranteed DSDD 3.5” discettes 
Lockable 40 x 3.5” disc storage box 


So88 
woos 


A+Computer Resco proudly announces 
their complete American support for the 
Sinclair QL and these fully authorized dealers: 


ompute 
Miracle Modaptor 
EPROM Eraser 


ge box 
Fidelity QL Colour Monitor 
Serial Printer Cable 
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BRSanoha 


eT.F.|.ComputerProducts ¢Sharp’sinc. 
859 N. Virgil Ave. Route 10, Box 459 
Los Angeles, CA 90029 Mechanicsville, VA 23111 
213-669-1418 804-746-1644 


e Russel Electronics 
Red Mill Rd. 
Center Hall, PA 16828 
814-364-1325 


@RMG Enterprises 
1419.5 Seventh St. 
Oregon City, OR 97405 


QL advanced User Guide 502-665-7484 


Machine Code Programming on the QL 
Desk-top Computing with the QL 
Database Management He the QL 


Sinclair QDOS Companion 
Advanced Programming with the QL 
Word Processing with the QL 
QL SuperBasic 
Sinclair QL Adventures 
QL Games Master 
Beyond the Arcade 
Home Applications on your Micro 
Practical Uses for Microcomputers in the Home How to computerise your busines successfully 
Blank Microdrive Cartridges LX80 Ribbon 
Also available: Many more @ Poke, Printers, Joysticks and all the 
latest software releases. Phone for more details. 
Phone or write for details of special offers. 


NOTE: All joysticks need an adaptor. 


UK: add 50p postage to orders under £5 
Europe: Deduct 8% from all software. Postage = £1.50 + 50p for each book 
Outside Europe: Add £5 Postage + £1 per book 


MPC Software, 
72, Julian Road, West Bridgford, 
Nottingham NG2 5AN Tel: (0602) 820106 


®@SCAD/ware 
Route 16, Box 37 
Church Creek, MD 21622 
301-228-7910 


Sunset Electronic 
2254 Tarval St. 

San Francisco, CA 94116 
415-665-8330 


®C.W. Associates 
419, N. Johnson St. 
ADA OH 45810 
419-634-4874 


e Curry Computer 
5344 Banff Lane 
Glendale, AZ 85306 


Business Computer Guide 602-978-2902 


SESEESEEE! 
1D 89 19 Go 69 69 BOD 
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e Pyramid Electronics 
2174 Gulf Gate Drive 
Sarasota, FL 33581 
813-922-9574 


@ Brice Road Pharmacy 
1653 Brice Road 
Reynoldsburg, OH 43068 
614-861-3600 


® Harry S. Walters 
1101 Bassick Rd. 
Trumbull, Ct. 06611 


© Knighted Computers 
707 Highland St. 
Fulton, NY 13069 
315-593-8219 


A Computer Response 


Prompt, Professional Sales & Service 
69-B Island St. Keene, N.H. 0341 @(603) 357-1800 
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For the September competition, Sinclair 
QL World has more than £400 worth of 
software to give away. French sofware 
house Pyramide has provided 20 copies 
of its design utility QL Peintre. The pro- 
gram is one of the best design utilities 
available for the QL and normally would 
cost £19.95. To see what our reviewer 
Ron Massey had to say about it, turn 
to this month’s Utility File on page 28. 

All you have to do to win a copy of QL 
. Peintre is write a short program to pro- 
duce a design on the QL screen. We 
will leave the choice of subject matter 
to you. Anything goes — from abstract 
images to digitised doodles. The only 
restrictions are that the program must 
be no longer than 50 lines and must be 
written in SuperBasic. When you have 
written your program, complete the tie- 
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breaker in no more than 30 words and 
send your entry on a microdrive car- 
tridge to: 

Picture Competition, 

Sinclair QL World, 

79-80 Petty France, 

London SW1H 9ED 

Senders of the best 20 entries in the 
opinion of the editor will recieve a copy 
opf QL Peintre. Alternatively, prizewin- 
ners may select another program from 
the Pyramide range of Nucleon, Othello, 
Vroom, Wanderer and Mortville Manor. 
(Please indicate alternative choice on 
form.) 

The closing date for the competition is 
monday September 22, 1986. If you 
want to produce some prize-winning 
pixels, you had better get cracking right 
away. 
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LISP £59.95 inc ve 


LISP interpreter for exploring ‘the language of artificial intelligence’, with 
graphics. 
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Keyword and Symbolic versions of this powerful APL interpreter by Micro 
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26 Portland Square, Bristol BS2 8RZ 
Tel: Bristol (0272) 428781 
In the USA call 1-800-252-6382 


Trademarks: UNIX-AT+T Bell Laboratories, QL, QDOS—Sinclair Research Limited. 


Prices include VAT, postage and packaging UK mainland only. Delivery, allow up to 28 days 
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The Lost Pharaoh 

_ Talent Computer 
Systems 

£14.95 


About six months ago there 
was a Spate of ancient 
Egyptian games for the 
Commodore 64 and 
Spectrum. In them, the 
player took the role of an 
archaeologist/explorer, the 
aim being usually to 
discover the buried Pharaoh, 
treasure. _ 

Talent has decided that if 
the theme is good enough 
for other machines it is g00d 
enough for the QL and has 
produced The Lost Pharaoh. 
It is essentially a maze game. 
You, in the guise of an 
intrepid explorer, must 
search the labyrinth of the 
Pharaoh's tomb for the 
sealed burial chamber. 
There you will find untold 
wealth in the form ofall the 
Pharaoh’s possessions, 
which he was hoping to take 
with him on his trip to the 
hereafter. 

Any maze game would, of 
course, be a dreadful bore 





were it simply a case of 
wandering round and round 
looking for the odd scarab. 
So to enliven things there 
are a few awkward | 
distractions. No game would 


_ be complete without its 


share of monsters to chase 
you around. The Lost 

Pharaoh, in addition to the 
usual collection of nebulous 
blobs with faces, has snakes, 
scorpions, skeletons, and no 


doubt one or two others I 


was too busy running away 
from to notice. One 
alternative to running away 
is to shoot the monsters with 
your blunderbuss. The only 
problem is that the 
blunderbuss is not 
particularly reliable and at 
times fails to fire. 

When you are not 
shooting monsters or 
running away, the idea is to 
collect keys from various 
parts of the maze. The keys 
open doors and provide 


Zapper. Attack of the disposable nappies. 


Eagle with Zapper 
Eidersoft 
&9.95 


4 


With two games for the price 
of one —less than &5 each — 
Eidersoft arguably could 
claim to offer the only 
budget software available 
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access to other chambers, 
one of which contains the 
treasure. | managed to find 
what I think was the burial 
chamber but could enter 
only via a dead-end route, a 
highly frustrating. 

_A sandy-looking scroll at 
the bottom of the screen 
provides information on 
your progress. You start with 
five lives and each time a key 
is collected the tally is 
incremented. The 
disappointing thing is that 
when a key is used it is gone 
forever, sO you would be. 
wise not to run through 
doors willy nilly. Do not do 


for the QL. 

Eagle is a Defender clone. 
For those who shun the 
pleasures of coin-operated 
computing, Defender was, 
and is, an arcade game 
which will go down in 
history as one of the all-time 
greats, alongside such as 
Galaxians, Space Invaders 
and Asteroids. 

The Eidersoft version is, 
by comparison with the 
original, fairly puny, but that 
is not surprising. What is a 
little disappointing is that it 
does not really stand up in 
its own right. 

You control a ship which 
zooms across a single-line 


dd scarab. 
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what I did and enter a 
cul-de-sac via a door with the 
last remaining key, only to — 
have it close behind you. 


_ As a maze game The Lost 
Pharaoh succeeds 
excellently, Tactically it has 
all the necessary 
requirements but what 


| really makes it is the 


excellent graphics. Egyptian 
hieroglyphics look brilliant 
in pixels, a fact which 
probably accounts for the 
general popularity of this 
type of game on other 
machines. I deserves to do 
as well on the QL. 


landscape and must destroy 
the aliens which appear 
every now and then. After 
destroying the first bunch of 
aliens, more cannon fodder 
was difficult to find and 
looking for it soon became 
tedious. 

Zapper, on the other 
hand, is a much better 
implementation of an old 
classic, Galaxians. The 
invading hordes hover ~ 
menancingly at the top of the 
screen before starting their 
kamikaze-style attack runs. 

You start the game with 
three ships and receive a 
bonus craft for every 10,000 
points. When the first attack 
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wave is destroyed you get a 
crack at the second and so 
on. 

The graphics are 
interesting, the aliens taking 
various forms from what 
looks like a disposable 
nappy to a Chinese lantern. 
After eight attack waves you 
return to the start. = 


My only two complaints _ 


are that the game does not 
seem to become any more 
difficult as you progress 
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Citadel. East meets west over a cuppa. 


Night Nurse 
Shadow Games 
5.95 


Night Nurse is not a sickly 
green medicine but a game 
where the nurse must be 
guided round the wards ina 
hospital to find the golden 
prescription which will 
allow her to retire early with 
an eligible young doctor. 
The game involves the 
collection of various items of 
use to any budding nurse, 
such as thermometers, 
bandages and tweezers. 
Not all of the objects 
remaining in the wards are 
as useful as they might be, 
like the purple medicine © 
marked X which, once taken, 
causes the nurse 
mysteriously to shed a few 
layers of clothing and 
quickly be reduced to her 
rather scanty underwear. 
Those rounds of the wards 
are naturally hindered by 
the presence of a range of 
bacterial-looking creatures 
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through the levels and even 
more aggravating, was that, 
on occasiions, the aliens 
appeared to be invincible — 
what we used to call not 
taking your shots. 

As a package it is certainly 
worth the money — Zapper 
just about compensates for 
the deficiencies of Eagle but 


the old adage you get what : 


you pay for undoubtedly 
applies. Do not expect 
anything brilliant. 
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and a sex-starved doctor 
who dances through the 
wards. Encounters with the 
pests understandably 
reduce the nurse’s stamina 
and therefore affect the 
overall score. 

The level of humour in 
Night Nurse falls somewhere 
between Benny Hill and a 
Carry On script, with the 
under-dressed nurse 
straight from the pages of a 
Richard Gordon novel. If © 
that kind of humour is 
appealing to you the game 
will provide good 
entertainment but it can 
wear a little thin after several 
plays. 

Shadow Games is 
reported working on a new, 
improved version of the 
game. It may well be worth 
waiting for that, rather than 
parting with your cash now, 
only to feel sick when the 
new version is released. 
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Citadel 
Eidersoft 
£9.95 


The on-screen briefing : 


informs you that the year is 


2439. Other than the 
uncomfortable fact that this 
makes you about 460 years 
old the date is of little 
significance. 

Citadel 5 is a divided city. 
The powers that be have 
decided that as they do not 
get on too well with the folks 
from across town they will 
split the place in two halves 
— East and West. As unlikely 
a scenario for a computer 
game as you could imagine. 

The object of the game is 
to re-unite the two zones by 
collecting all the symbols 
scattered around the city. 
This is accomplished in your 
multi-directional variable 
thrust ship. The ship is 
docked in the Western half 
of the city. A quick blip on 
the joystick, or cursor keys, 
which is easier, sends it 
cruising out of the bay. 

The objects which must 
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Night Nurse. Eat your heart out Benny Hill. 


be collected to restore 
East-West harmony are 
teacups and glass vials. 
Picking them up is simply a. 
question of manoeuvring 
alongside and touching 
them. The danger is that in 
your incompetence you are 
more likely to smack into a 
wall or get shot by the 
defence systems. 

Your craft has an airbrake 
but it can be used only once 
per screen, so to stop you” 
must turn the ship round 
and apply some reverse 
thrust. This is where the skill 
enters into it. After a time 
you wiil be able to change 
direction on the move by 
applying thrust at the correct 
angle to turn corners 
without stopping. 

I must admit to finding the 
game somewhat pedestrian 
but not everyone likes the 
action at a furious place. 
Citadel will probably appeal 
to those who enjoy a test of 
skill and accuracy. 





INFORMATION 


Eidersoft 

The Office, Hall Farm, 
North Ockenden 
Upminster, Essex 
RM14 3QH 

Tel: 0708 852647 


Talent Computer Systems 
Curran Building 

101 St James Road 
Glasgow G4 ONS 

Tel: 041 552 2128 


Shadow Games 

1-2 The Cottage 
Maidenhatch 

Tidmarsh near Reading 
Berkshire RG8 8HP 
Tel: 07347 44654 


Eagle, Zapper and Citadel 
are now available on one 
Microdrive, price £16.95 
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SOFTWARE APPLICATIONS 


_ This month John Barnes 
reports on the unusual 
use of QL is being put to 
in South London 





aa, 


"he Sussex in Streatham, 
south-west London, is an 
Ordinary enough — public 
house trom the outside but 
in the last 18 months has un- 
eras a technological revolution, at 
the centre of which is a Sinclair QL. 
Originally the pub was one of 
London's first venue houses regularly 
attracting a large number of locals to 
the live entertainment provided but 
through the years its popularity 
diminished. The pub has been refur- 
bished and fitted with the latest audio- 
visual equipment. The new image the 
Sussex is presenting to the world has 
helped to re-establish its position as a 





top London pub and Whitbread’s lead- 


ing house in the U.K. 

The audio-visual system installed re- 
cently incorporates satellite television 
facilities, broadcasting regularly selec- 
tions of Music Box, the 24-hour satellite 
music channel, a 10-monitor Phillips hi-fi 
video network, compact disc and more 
than £15,000 worth of high-quality 
audio equipment. 

The QL plays a very important part in 
the entertainments system, as Adrian 
Pepin, the licensee, explains: 

“We did not want to show videos all 
the time but neither did we want blank 
screens, SO we decided to use a com- 
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puter to enchance the visual side of the 
system.” 

The QL therefore provides a news 
service, which is particularly popular 
during lunch-time sessions, an in-house 
advertising facility publicising forthcom- 
ing events at the Sussex, and a 
message service providing an added 
dimension to music dedications. 

Text is keyed into the computer, with 
brackets displayed on the monitor act- 
ing as a scale indicating how many 





characters can be fitted across the 
width of the screen. Messages, adver- 
tisements and up-to-date news are 
displayed and checked for errors, then 
scaled individually to save memory, on 
the smaller Hitachi 10in. monitors be- 
fore they are transferred to the larger 
Phillips matchline monitors and broad- 
cast round the bar. 

The program has many additional fea- 
tures, all of which have been written-in 
to provide ease and speed of operation. 
A good example is an automatic check 
on colour combinations which prevents 
the operator concocting indefinable 
combinations of colour; there is also a 
colour update option which changes the 
screen colour automatically after an in- 
terval has elapsed. 

The man behind the QL in every sense 
is Trevor Heartfield, a professional com- 
puter programmer with Citibank. He 
wrote all the programs used at the 
Sussex and was instrumental in the de- 
cision to buy a QL. Originally the function 
of the QL was to be performed by a 
Commodore 64 with a scratch-pad but 
the Sinclair was chosen because of the 
greater number of technical possibilities 
it could offer. 

Heartfield explains: “The pleasant 
thing about the QL, even in its basic 
form, is that there are two Microdrives, 





two serial ports, the hardware available 
to expand the memory to half a mega- 
byte if necessary, multi-tasking and a 
brilliant instruction set.” The QL has 
proved, in the short period it has been 
used, a remarkably reliable machine, 
performing adequately everything which 
has been demanded of it. 

. Because of the reputation Microdrive 
cartridges had acquired Heartfield had 
resigned himself to the fact that they 
might have to invest in disc drives, but 
that has not been neccessary, as only 
two Microdrive cassettes have gone 
down, both of which had back-ups and 
were re-formatted, so presenting no 
further problems. 

As a professional programmer, 
Heartfield is also able to appreciate what 
can be achieved on the QL by any 
proficient person. “! am familiar with all 
kinds of Basics, working in a business 
environment, and SuperBasic is pleas- 
ant because it has some structure in it 
which allows for fairly well-structured 
programs, but there are certain little 
things which are not the same as 
standard Basic, so you can get caught.” 

Despite that, he has written some 
programs which have proved useful at 
the Sussex and has many programming 
projects he hopes to complete. One of 
them is a screen editor. It would not 
only provide the computer operator with 
a very useful aid but would also repre- 
sent a considerable time-saving during 
busy periods. 

The growing popularity of the mes- 
sage and news services are also making 
it anecessity, as the increasing amount 
of information which has to be fed into 
the computer allows less time for the 
important task of error-checking. 

The editor, however, would help to 
rectify that. Once the system has been 
running for a period, any operation 
difficulties which may arise will be cor- 
rected and then Heartfield hopes to write 
several programs to utilise the computer 
even more. Such improvements 
definitely will enhance the already- 
impressive audio-visual system and 
make it much more versatile. 

Pepin is convinced that is the way the 
computer ultimately will be used at the 
Sussex and is finding that it is invaluable 
for marketing, promotions and 
announcements or for communicating 
with customers. 

The use of the QL is only in its infancy 
at the Sussex and both men intend to 
do a great deal more with it. “This is 
literally phase one.” What we intend to 
do with this machine and the interest 
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that has been shown in it is of real impor- 


tance to the acceptance of computers 


for out-front business usage, as 
opposed to their traditional office role”. 
The increasing popularity of the Sussex 
would seem to justify that optimistic 
view. 

Has there been a noticeable increase 
in trade since the entertainments 
system was installed? “We have noticed 
a 25 percent increase in custom and 
the computer is a very important part 
of that, as the interest generated in mes- 
sages and news items has shown. It is 
a facility which cannot be measured 
against anything else”. 


Peter Cowley investigates 
how it is possible to widen 
the choice of printed out- 
out from Quill. 






» oO that you can employ in Quill 
| the various foreign characters 
“Sl, and also have a wider choice 
_ of print modes, such as pica, 
elite, italic, double width, in 
a Bing HBouriori here are some hints 
on how to extend Quill to use the full 
range of characters of your printer. 

The Quill printer driver is set for the 
U.S. character set and produces only 
one “foreign” character, the £ sign. How 
the Quill document appears in print de- 
pends on whether the printer DIP 
switches are set for pica, italic or what- 
ever. In Quill, you are provided with 
choices between bold, underline, sub- 
script and superscript but there is no 
facility for printing in other modes or for 
calling-up more foreign characters, un- 
less you stop and make some tedious 
changes to the DIPs or the printer driver. 

If you are working in SuperBasic, 
there is no difficulty. The standard 
printer code for selecting a different 
foreign language font is ESC, R, n where 
the value of n allows you to select the 
required font. In a SuperBasic program 
you put in a line equivalent to this, e.g., 
100 PRINT #4, CHR$(27); 
CHR$(82);CHR$(2) will select German. 

Other numbers in the final brackets 
will select other fonts. All the other 
facilities of the printer are accessible by 
similar insertion of the required codes. 
Quill, however, will not accept those 
codes — it simply reproduces them as 
part of your document. The following 
explains various ways of getting it to 
accept what control codes you want. 
Which method you choose is for you to 
decide. 

The TRANSLATE option. The printer 
driver for Quill Version 2 provides for up 
to 10 translations of single characters. 
TRANSLATE 1 is already set to change 
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July’s article on Data 
protection included an 


incorrect program listing. 
here with our apologies is 
the correct listing. 


200 DEFine PROCedure password 


count=0:pwds="* 
PRINT#O, "ENTER PASSWORD" 
REPeat kéy 


ke=inkeyS(-1) 


to the English set when £ is keyed-in 
and then back to the U.S. set. Inspec- 
tion of the printer driver will show that 
this is achieved by TRANSLATE 1: 
£,ESC,R,,ETX,#,ESC,R,NUL. If you are 
puzzled by the appearance of this, the 
various Characters are explained in the 
User Guide under QL Programs Prin- 
ters. 

The point to understand is that this 
translation is making use of the printer 
code ECS,R,n. The — beginning 
£,ESC,R,ETX (ETX=8) instructs the 
printer to use the English character set 
for the £; the rest causes the printer to 
revert to the U.S. set. 

Similarly, you can have é in café by 
installing the Quill printer driver with 
TRANSLATE 3: @€,ESC,R,SOL, 
{,ESC,R,NUL (type 134, 
ESC,”R,1,123,27,“R,0). That calls the 
French character set and then reverts 
to U.S. The problem is how to get 6 on 
to the QL screen? On my early AH QL, 
é is obtained as CHR$(131) though the 
User Guide Character Set indicates 
CHR$ (143)! The keying for CHR$(131) 
is CTRL Shift 3 — pressed all together. 
That produces é€ on the screen and 6 
alsO appears in your printed document. 
If you need only a few odd characters, 
this is the best approach. 

Replace existing Quill options. If you 
need to switch frequently between two 
language fonts, you may prefer to 
replace, say, the BOLD ON instruction 
in the printer driver by ESC, “R,2 (for Ger- 
man). You will then get the German 
characters in Quill when you access 
BOLD by keying F4 B. To allow exit from 
German to U.S., the BOLD OFF instruc- 
tion should be amended to ESC,”R,0. 

The various German characters will 
be listed in your printer handbook under 
the ESC,R,n code. The normal keying 
of [/) {|} ~ will produce the German 
AOUadUB. One point to watch is that 
other TRANSLATES may interfere. If you 
key £ while using the German set it will 
have the effect of reverting to the U.S. 
set, so after £ it is necessary again to 
call BOLD ON. It is possible to call-up 





PRINT#O,'°?'; 

IF CODE (kK®)=10:EXIT key 
PpwdS=pwdSkks 

END REPeat key 
count=counttl 

IF pudS=pwordS$: RETurn 
IF count=3:CLS#0: STOP 
CLSHO: GOTO 220 


END DEFine 


———r 


alternative character sets covering Sev- 
eral languages using the ESC,6 or the 
ESC,I,1 codes. 

Your printer character set may not 
match that of the QL, so foreign charac- 
ters may not appear the same on the 
screen as when they are printed. It is 
easier to cope with only a few such 
characters at a time by calling single 
language sets. 

Other options, using printer codes di- 
rectly within Quill, are possible because 
Epson-compatible printers have alter- 
native keyings for many of the printer 
codés. They use chr$(num), where num 


‘is 128 higher than the usual code, which 
lies in the range O to 127. Leon Heller 


drew attention to that in QL World, 
October, 1985, p.30. Thus Quill will not 
accept the ESC instruction CHR$(27) 
but it will accept the QL keying corres- 


ponding to CHR$(155). The keyIngs are 


listed under Character Set in the Con- 
cepts section of the User Guide. For 
chr$(155) press the CTRL and ; keys at 
the same time. 

In practice, most printer codes involve 


ESC so, to avoid complicated keyings, 


it is better to set up a keyboard charac- 
ter to be read as ESC, using the TRANS- 
LATE option. Keying the copyright 
symbol will do that if the driver is 
changed to TRANSLATE 6: 127, 27. 
Install this and start a document in Quill. 
If you key-in the copyright symbol, fol- 
lowed without spaces by one or two 
control characters, the printer will be- 


‘nave as required. The control characters 


will appear on the screen but will not be 
printed. In that way many of the printer 
facilities can be accessed in Quill: 

4 Italics on, 5 Italics off 

M Elite on, P Elite off 

01 Proportional on, pO Proportionall off, 
and so on. 

Finally, there is the possibility of using 
more than one printer driver, if they are 
stored under different names in the IN- 
STALL_BAS program. For further de- 
tails see the letters by Jim Knife and 
Peter Singer in Open Channel, Sinclair 
QL World July, 1986, 0 15. 
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220a Tottenham Court Road, London, W1P9AF. _Tel: (01) 636 2547 
224 Tottenham Court Road, London, W1P 9AF. Tel: (01) 580 6382 
Telex 946240 Cweasy G (Quote 19010170) 
Leisure 


[tenet uages 

Wanderer (Pyramide) .............ccccsccsesesssessesees £ 18.00 igital Supercharge V1.18 .........cccscscsesrsees 

CRBC (PVIENONID) ciccztssalisassconcstuccansaebeetcs £13.00 Digital Forth + Reversi ..........ccccccceseseseee 

MIDOM (PYTEIINIG). 5. cccssaiccncsssssoscteovecesctocseoss £13.00 Digital Super MOmitor ..............cccccessesesrenes 

Mortville Manor (Pyramide) ...............csse00e £18.00 Digital Super Sprite Geno... sce eceeeeeee £ 24.00 
Dragon Hold (RUDICON) ...........c.cccccceseseeeeseees £14.00 Metacomco Latice C ........... sO rain ecee £ 85.00 
Aquanaut (Micro deal) .........cccccccseceseeeee £18.50 §Metacomco MCC Pascal ou... £ 79.00 
Flight Simulator (MD) ...........ccscccssesseeeseseers SAG Ser. ETROOINGO LIBR as iivcscretscucsstestwnsvedbcasasctecs £ 51.00 
GRIRSS SION), sities cose nciresscatactevesscseeeeer £18.00 Metacomco BCPL ...........cccssscssssesececes -£ 51.00 
Scrabble (Leisure Gen’) ........ccssccssseeseees £14.00 Metacomco Assembler ..........cccccscsesesseeees £ 33.00 


































BJ Retumm (Eidersoft) .............cccccssssssssssseees E IZOD: PIGSHONO FORMIGN. 10 - sciscsccsssasseaasecverssiciscesets £ 95.00 
SOE NEMMSON DD a ceacascorsieccasiecatvasveveCoecn © 10:00: —“Prosnera ‘Pascal 5. 2ss5 sas. cccas hs cetietowncotie £95.00 
Eats (ENIOPSOND ci tcdctscdiescscsssatesseasescacsssence £ 13.00 Talent Assembler Workbench ..................... £ 24.00 
SD Slime (Datalink) ......cccccccsccccccccscsosssoseaenss £12.00 — Eldlersoft MOUGs ............ccccccosssccsscsscseseseees £ 85.00 
Special Pack ° , 1CE........ song pebudscaasnentneesasoacdoaneteat (oreati sen £ 21.00 
Citadel/BJ 3D/Zapper CHOC cones ovsaneeonecr nncsecotonatocsanenonniten £ 14.00 
Graphics € 14.95 Le Se £ 9.00 
PRIMM OIE CT RNOUIN)S5c6<cssshoaecaccconeononsssssi0voeste £ 47.00 PUIG cr HET .sdienn cial, chvecl nto ohee £ 12.00 
ETE: CEE) cic, cocssncecaiesctsbancareosnesesvocovare E150 GSD EISSN, ons cine cscedvcsccessstesuvcavesscens £ 19.00 
QL Peintre (Pyramide) ..........ccccseesssceseseees © FASO: 2 ARCHIVOS: (EIMCESONMD ssc ccciincssassccerseasdecessctices £ 17.00 
Nucleon (Pyramide) ..........c.crorocsrecssceccseseees £19.00 Super Media Manager (DP) ..............0..... £ 36.50 
Ge PAN IN Wl 3, ABT Foc Sich checasesiseaty ek £14.00 Mail List (Transform) ..0.......c..ccccsseseseseseeees £ 14.95 
WED CVARTPIAD- sccscz0sceecacasccsarerontesvasrcuelee £19.00 Appointment Dairy (Transform) .................. £ 24.00 
NSSCOPY TABMNAR) eis cccacccnsclecesstacescseseovecvesse STROOD SUCK COMION sesicscccssicsccussnctsssciecscectossssevaens £ 14.95 
BVOC) (DG |) caccsccssenssccoceuchuccxaucectacocoactts £ 24.00 
CA UGONTMR eh c5 Pe Sis sbeecctecvonczersacissteoaonents P.0.A. Power Line Cleaner .........sscssssssssessneesssees £ 90.00 
MicroVitec Cub 1451/DQT3 With Stand ...... £270.00 Miracle 256K Expanderam ..............:ssss00 £ 89.00 
Philips CM 8533 Colour monitor Miracle 512K Expanderam ........sesssesssesssesees £119.00 
Composite Video (phono) Miracle Ram Disc Software ..........cc.cccccseeeee £14.00 
' RGB to Linear input (SCART) Miracle/QCode Modaptor ...,......:ccscseesseens £ 38.00 
RGB/RGBI to TTL (for QL) Miracle WS2000 Modem ............ccccsceceseees £119.00 
| plus many other features 0.0.0... cssseseeeees £289.00 — Nightingale MOde@M .............sessssssessseesseesseees £109.00 
Philips BM7502 Mono Moon ...............00000000+ £ 84.00 
PENNE RT OOO ccs vossccecapsascsustovecuceseces £199.00 PCML Disc Interface 20.00... ceceseseseeeeeeees £ 98.00 
SE WUE iis cccccstescasvasscsusvesetnitvatsavccneete sees £275.00  PCML Dual 3.5” Disc Drive including /F .... £289.00 
EDGON RGD: cisesceecanssvcoistieinsieacieag ee £229.00 Cumana Disc Interface .........c.cscsscssesecssseene £ 89.00 
EEIGONERGG 5.0 susasoscstsuscotm eatin icone £269.00  Cumana Dual 3.5” Disc Drive including I/F . £284.00 
CHUN TROD 2.55. <csss feos hen ee eee £189.00 
IUPOMUL SEF te ochcctecasorscéciscresacsvttvend: £210.00 Dust Cover for Qh ou... cccscscccsesssscossesssessseres £ 495 
Quen Data Daisy Wheel ............cccccsseeceene £189.00 Cart (Soft) Storage BOX ..........cccsscssessssesessens £ 3.50 
Canon PJ1080 Colour ..........cseescseseseseees £349.00 = Cart (Hard) Storage BOX .......c.cse.csessssesseseen £ 4.95 
Miracle Centro VF aC@ .....c.ccccscsssesssseessesseeens £19.00 Cartridges in 4 Pack ..........ccccsccsessessscssseenees £ 7,95 







We also stock other makes of computers, peripherals & software for 
Amstrad, Atari, Commodore (Amiga) etc...... 
All prices are including VAT. Postage above £20 on software is free. 
Ga = lease add 50p to order under £20. For computer, printers & monitors 
VISA please add £7.50 per item. Postal rates apply to UK only. 
Saas Overseas orders are welcomed. 
VISA AND ACCESS WELCOMED 
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UK’s LOWEST PRINTER PRICES 
342” SINGLE DRIVE SYSTEM (.75m byte) £95.00 


ae ~=WITH ALL PRINTERS, QL USERS PRINTERS GUIDE : : = oe Ein sas 
: 342” DUAL DRIVE SYSTEM (1.5m byte : 
GOVERNMENT AND OFFICIAL OVERSEAS ORDERS WELCOME PCML INTERFACE (+ 256KRAM& TOOLKIT £220.00 £253.00 


|| PANASONIC 1080U £159 ex VAT £182.50 inc VAT |B On NTERFACE (No RAM Expansion) £87.00 £100.08 














































MONITORS 
PHILIPS 7502 GREEN 
MICROVITEC CUB 1451/653 
PLUS NEAR LETTER QUALITY 2 
SHINWA CP A80 + NLQ ! 
EPSON LX 80 £190.00 £224.25 MODEMS 
CANON 1080A £209.00 £240.35 TANDATA (COMPLETE SYSTEM) £119.00 £136.85 
CANON A55 £345.00 £396.75 
EPSON FX 85 + £360.00 £414.00 SOFTWARE ARIOUS 
EPSON FX 105 + £455.00 £523.25 RING FOR BEST sei ) 
EPSON LO 800 £515.00 £592.25 
EPSON LQ 1000 £546.00 £627.90 
EPSON LQ 1500 £715.00 £822.25 COMPUTERS 
SINCLAIR QL ONLY £173.05 £199.00 








ang igs | £149.00 £171.35 COMPLETE PACK SPECIAL OFFER 
sith DX100 - SPECIAL OFFER: £386.00 £409.40 THE WORLD'S BEST With EPSON LX80 F/T £619.00 - £711.35 







PRICES ON SINCLAIR QL, 
MICROVITEC CUB 563, With CANON 1156- £842.00 - £968.30 


RINTE . PRINTER & ALL LEADS 
rs ee oe: AND INTERFACES With KAGA TAXAN - £581.00 £668.15 












PRINTER INTERFACES 
MIRACLE SYSTEMS 
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MICRODRIVE 


EXCHANGE 





PROGRAM OF THE MONTH 
This month’s Program of the Month is Cad QL by 
Tony Quinn. It is a very sophisticated and much 
enhanced version of the program published in The 
Progs pages. 

It includes many of the features you would expect 
to find in a good CAD package, including rubber 
banding, grids, circles, arcs, boxes, and a fill func- 
tion. In addition there is a symbol designer which 
allows you to create up to 30 symbols for inclusion 
in your design. 

CAD QL has been written in Superbasic and com- 
piled using: Digital! Precision Supercharge, so screen 
~ designs, saving and loading can all be accomplished 
in Super-quick time. 








Supercharge is available from Digital Precision 
22 The Avenue, London E4 9SE Price: £59.95 


HOW TO ORDER 


Listed are programs which have appeared as 
listings inside QL World/QL User and Sinclair QL 
World. 

To the right of each program entry is a small box, 
which you should mark with a bold cross if you want 
to order that program. 

Once you have put a cross next to all the programs 
you wish to have copied onto microdrive, simply com- 
plete the rest of the order form and send it along 
with your PO/cheque AND BLANK FORMATTED DRIVE 
to: 

MICRODRIVE EXCHANGE, 

Sinclair QL World, 

79-80 Petty France, 

London SW1. 

If you wish us to supply the drive, please add an 
extra £2.50 for every drive required and mark the 
order form appropriately. 

Please allow 28 days for delivery. 


t Noof drives required @ 


JRDER FORM 


Author Language Program Name Price Issue Size 


Giles Todd (b) DIY Assembler £5.00 Mar/Jun 120[ | 
Converts Assembler source into m/c object code 


| Tony Quinn (SC) CAD QL £4.00 Set’86 120[ | 


A Didcock (B) 
Pit your wits against the QL 


Shergold & Tose (B) *Golf £2.00 May 35[ | 
From fairway to green on 50 different courses of varying difficulty 


Williams & Holliday (AO) Paladin £5.00 Apr 70[ | 
The basis of our games programming series — a space invaders type game written entirely machine 
code 


Richard Cross (MB) Sprite Animation £2.00 Apr 50[ | 
A subtle blend of machine code and SuperBasic that produces a versatile sprite designer and high 
speed animator 


Steve Deary (B) Pacman £1.00 Mar 20(_ | 
A reasonably fast rendition of the famous arcade favourite 


Andy Carmichael (B) Family Tree £3.00 Aug 100[ | 
Archive program and database for setting up and displaying large family trees 


James Lucy (B) Composer £3.00 Oct 50/ | 
Composer and play sheet music on the QL 


J M DOWER (B) Mushyman £2.00 
Mushroom munching arcade action. 


PJ Smith (B) *DIY Adventure £1.00 Feb 60/ | 
A skeleton framework where you simply have to slot in the details to create your bespoke adventure 


R Green (B) Qthello £1.00 Aug 25[ | 
A 3D version of the well known board game Othello for one or two players 


S$ J Ackers (B) *Touch Type £4.00 Aug 80/ | 
Touch typing course — 14 lessons, on-screen keyboard, 800+ word vocabulary and WPM readout 


Connect4 £1.00 Sept 15[ | 


Jun/Jul’86 15[ | 


Rob Sherratt (AO) FCOPY £4.00 #Mar’86 80[ | 
A machine code microdrive utility for turbocharged file copying 


Alan Prior (B) World Map £2.00 Mar ’86 80[ | 
A high resolution multi-coloured map of the world for geography buffs 


B = SuperBasic, SC = Supercharged AO = Assembler + Object Code (ready to run), 
MB = Machine Code + Basic loader 


Name 
Address 


No of programs ordered 

Total sectors 

{max 200 per drive) 

No of drives sent 

£2.50 each 
Plus postage — packing £ 


Sub total 
Add VAT @ 15% 


TOTAL TO BE SENT 


Please copy on to Microdrive the programs above which | have indicated with a cross. 
enclose a cheque/PO to the value of £ .....{made payable to QL World). | understant 
that Sinclair QL World undertakes only to SUPPLY these programs (copied on to 
Microdrive) and accepts no liability for their operation as defined by the author. 
Neither can Sinclair QL World supply additional information about any of the listings 
other than that originally printed. Any article reprints required must be ordered and 
paid for separately at £1 each inclusive of post and packing (2 overseas). Please 
mark the envelope Dept. LB. 





If you’ve a program that is worthy of consideration, send it to ‘The Progs’, 
Sinclair QL World, 79-80 Petty France, London SW1H QED. We pay for everything 
published at the usual page rates. 


Computer aided design seems to 
be the flavour of the month for 
the QL. There are no fewer than 
13 commercially-available pro- 
grams which enable you to pro- 
duce on-screen designs with the 
help of your QL. 

This program incorporates 
many of the features you will find 
on professional CAD packages. 
They include rubber banding, 
user-selectable grids, arcs, circles 
and boxes among others. Part 
completed designs can be saved 
to Microdrive and finished at a 
latter stage. 

The version on Microdrive 
Exchange has a number of extra 
features. They have been 


a$(1) 
s$(1) 
author$(5@) 
mode$(5) 

col$(5) 

clear$(1) 
size$(1) 
symbol_number$(3) 
h$( 19) 

v$(10) 

k$(5) 

pc$(1@) 

xt$(19)_ 

DIM text$( 5d) 

DIM shape_data$(1) 
col$="Whits 


DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 
DIM 


189 
118 
122 
132 
149 
15@ 
162 
17 
18d 
199 
288 
219 
22D 
230 
248 
268 
278 


included on the main menu so 
that you know what you are mis- 
sing but, if selected, will not func- 
tion. In addition, the Microdrive 
Exchange version has a symbol 
designer which enables you to 
store much-used symbols and 
recall them for multiple use in 
your designs. 


":mode¢="Move ' 
coordinate_display_flag=@:x_len=5:y_len=5:coun 


ter=1: qvomp_flag=@: ds=9: d=1:symbol_nr_buffer=@:s_p 


=1:h1=@:v1-@ 


289 DIM sp(21):DIM sp_y(21):DIM sp_x(21):DIM sb(21 


):DIM h(2@):DIM v(20) 

313 SET_UP_NEW_ WINDOWS 

328 CHOOSE_A_GRID 

338 INK #1,cursor_colour 

349 cursor_flag=-1 

35@ REPeat main 

360 

37@ 

380 

39D 

400 IF 

419 IF 
IF 


OVER -1:CURSOR x,y, 
KEYBOARD_INPUT 


cursor_flag=@ AND a=2@8 THEN 


cursor_flag=@ AND a=192 THEN 


cursor_flag=@ AND a=2@@ THEN 


OVER -1:CURSOR x,y,-3,-2:PRINT 
cursor_flag=@ THEN :OVER @:LINE x,y 

coordinate_display_flag=1 THEN : display 
cursor_flag=@ AND a=216 THEN 


IF cursor_flag=@ THEN : OVER @:LINE x,y 
sai ect ge cl De) Ef WA Mie se 


rySS 


*LINE x,y TO.> 
SENET x,y" tO 
>LINE x,y TO 


2 LINE x,y TO 





462 


IF cursor_flag=@ AND a=97 THEN :LINE x,y TO x- 


d,y+d 


47 


IF cursor_flag=@ AND a=65 THEN :LINE x,y TO x- 


d,y+d 


482 


IF cursor_flag=@ AND a=122 THEN :LINE x,y TO x 


+d,y-d 


49D 


IF cursor_flag=@ AND a=9@ THEN :LINE x,y TO x+ 


d,y-d 


5BD 


IF cursor_flag=@ AND a=39 THEN :LINE x,y TO x+ 


d,yt+d 


518 
d,y- 
520 
532 
542 
550 
562 
578 
n 

58D 
n 

59a 
62 


619. 


629 
638 
649 
65d 
669 





IF cursor_flag=@ AND a= 
d 

SELect ON a 

=194: d=d-.5:CHANGE_CURSOR_SPEED 

=202: d=d+.5: CHANGE CURSOR SPEED 

=192:x=x-d: IF x<1 THEN BLEEP:LET x=g:NEXT main 
=209:x=x+d:IF x>g THEN BLEEP:LET x=1:NEXT main 
=208:y=yt+td: IF y>ga THEN BLEEP: LET y=1:NEXT mai 


47 THEN <> LINE x,y TO x- 


=216:y=y-d:IF y<1 THEN BLEEP:LET y=ga:NEXT mai 
=97,65:x=x-d: y=y+d: TEST DIAGONAL_MOVEMENT 
=122,9@: x=x+d: y=y-d: TEST_DIAGONAL_MOVEMENT 
=39:x=x+d: y=y+d: TEST DIAGONAL MOVEMENT 
=47:x=x-d:y=y-d:TEST_ DIAGONAL MOVEMENT 
=82,114:REMOVE_GRID 

=248:OVER @:SET_A DOT 

=244: OVER @:SET_A PAD 
=195,73:CHANGE_COLOUR: INK #1,cursor_colour: NEX 


T main 


67D 
689 


=119,87:OVER 9: WRITE_TO_ SCREEN MENU 
=88, 129, 89,121:IF coordinate_display_flag=@ TH 


EN eoundinate die bag flag=1:ELSE coordinate_displ 
ay_flag=@:IF coordinate —display_ flag=@ THEN AT #5 


,0,7:PRINT #5, 


69D 
70D 
71 
72@ 
73@ 
74D 
75f 


o Grid - 


860 
870 
88D 
BID 
IDE 
91 
92 
930 
940 
95D 
969 
978 
98D 


AL Od, 7 oP REN) 360, 
“:END IF :END IF 

=32: CHANGE_CURSOR_MODE 

=69,101: RUBOUT 

=98,66: CHANGE _BORDER_COLOUR 

= 76,18: LOAD_DIAGRAM 

= 83,115:SAVE_DIAGRAM 

=215:AUTHOR_OF_OQCAD_QCOMP 

=74,1%6: JOIN_DOTS 

=67,99:CLEAR_SCREEN: IF ag=="y" 


THEN CHOOSE_A_G 


:END IF 


=49: BLEEP 

=50: ARCS BOXES CIRCLES 
=53:d=5:INK #5,6:AT #5,4,11: 
,1@:PRINT #5,d 
=232:RUBBER_BANDS 

ON a = REMAINDER : NEXT main 
END SELect 

END REPeat main 

DEFine PROCedure CHOOSE A GRID 
INK #6,2:AT #6,0,135: PRINT #6,"Dot 
*Q” for OQL-COMP" 
KEYBOARD_INPUT: CLS 

SELect ON a 
=83,115:SQUARE_GRID: QCAD_MENU: QCAD_LOGO 
=68, 1808: DOT_GRID: OCAD_ MENU: QCAD_LOGO 
=REMAINDER :QCAD_MENU: QCAD_LOGO 

END SELect 

END DEFine 

DEFine PROCedure CHANGE_CURSOR_SPEED 
INK #5,6 

IF d<.5 THEN d=20:END IF 
IF d>2@ THEN d=.5:END IF 
AT #5,4,11:PRINT #5," 
AT #5,4,1:PRINT #5,"Step 


PRINT #5," 


Square : N 


>" :AT #5,4,10: PRINT 
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#5,d 

999 END DEFine 

12900 DEFine PROCedure CHANGE_COLOUR 

1916 IF cursor_colour=6 THEN cursor_colour=4:ELSE 
cursor_colour=6:END IF 

1926 INK #1,cursor_colour:STRIP #5, cursor _colour 


193@ IF cursor_colour=6 THEN :col$="White ":INK #5 
,O:AT #5,2,1: PRINT #5,col#: END IF 
1040 IF SuLaok colloid THEN :col$="Gresn “:INK #5 


,O:AT #5,2,1:PRINT #5,col$:END IF 

1958 PAPER #5,2Z 

1968 END DEFine 

197@ DEFine PROCedure display 

1@8@ INK #5,@:STRIP #5,4 

nee AT #5,0,8:PRINT #5,"X% >":AT #5,0,14:PRINT #5, 

es AT #5,1,8:PRINT #5,"Y >” 
9" 

111@ IF x<1@ THEN AT #5,9,11:PRINT #5,” 
,13:PRINT #5,x 

1129 IF x>9. 5 AND x<1@@ THEN :AT #5,0,11:PRINT #5, 

" "“tAT #5,0,12:PRINT #5,x 

1130 IF x99, 5 THEN AT #5, @,11:PRINT #5,x 

1149 IF y<1@ THEN AT #5,1, ei. PRINT #5, “SAT #5,1 
,13:PRINT #5,y 

1159 IF y>9.5 AND otis THEN AT #5, 1, 11:PRINT #5," 
“:AT #5,1,12:PRINT #5, 

1160 PAPER #5,2: INK #5, é 

1179 END DEFine 

1189 DEFine PROCedure QCAD_ MENU 

1190 CSIZE #4,0,9:CSIZE @,@:PAPER #4,4:CLS#4:BORDE 

R #4,1,255 

1203 BORDER #6,1,255:CLS#6 

1210 INK #4,90:AT #4,@,2:PRINT #4,"Commands -” 

122@ OVER cursor_flag 

1230 AT #4,1,2:PRINT #4,"Border"” 

1240 AT #4,2,2:PRINT #4,"Clear" 

1258 AT #4,3,2:PRINT #4, "Erase" 

1260 AT #4,4,2:PRINT #4,"Ink " 

1270 AT #4,5,2:PRINT #4, "Join" 

1280 AT #4,6,2:PRINT #4, "Load" 

1290 AT #4,7,2:PRINT #4, 

1300 AT #4,8,2:PRINT #4, 

1310 AT #4,9,2:PRINT #4, "Ola" 

1326 AT #4,190,2:PRINT #4, “Print™ 

1330 AT #4,11,2:PRINT #4:,."Remove” 

1340 AT #4,12,2:PRINT #4, "Save" 

1350 AT #4,13,2:PRINT #4,“Write" 

1360 AT #4,14,2:PRINT #4,"X - yY" 

1370 STRIP #4,2:INK #4,6 

1388 AT #4,16,2:PRINT #4," Fi - Bands " 

1399 AT #4,17,2:PRINT #4," F4 - Pad " 

1490 AT #4,18,2:PRINT #4," F5 - Point ”" 

1410 PAPER #4,4 

1426 END DEFine 

1430 DEFine PROCedure SET_A_ PAD 

14490 LINE <-1.S,y9=) 20 x=<2.5, TO y+ TO xh. S,y+i42 

© x41 S5y=—1-1TO x-1  S3y=1 

1458 OVER cursor_flag 

1460 END DEFine SET_A PAD 

1470 DEFine PROCedure SET_A_ DOT 

1489 FILL i:LINE x-1,9+1 TO x+1,y+lL TO x+i,y-1 TO 

x-l,y-1 TO x-1,yti1:FILL @ 

1499 OVER cursor_flag 

15@@ END DEFine 

1510 DEFine PROCedure TEST_DIAGONAL_MOVEMENT 

1520 IF y<1 THEN LET y=ga 

1536 IF x>g THEN LET x=l1 

154@ IF x<i1 THEN LET x=g 

1559 IF y>ga THEN LET y=1 

156@ END DEFine 

1579 DEFine PROCedure WRITE_TO_SCREEN_MENU 

1588 IF qcomp_flag=@ THEN : INK #4,2:STRIP #4,6:AT 

#4,13,1:PRINT #4," Write ":PAPER #4,4:INK # 

4,@:END IF 

1594 CLS#6:INK #6,2:size=1 

1600 AT #6,0,190:PRINT #6,"[ 1 ] Normal 

gs £53 sh iWide, Test” 

16198 KEYBOARD_INPUT 

1626 IF CODE (a$)<>Z27 AND CODE (a$)<>49 AND CODE (¢ 

a$)<>5@ AND CODE (a#)<>51 THEN :GO TO 16198 

1630 SELect ON a 

1640 =49:CSIZE #1,9,%:size$="1" 

165@ =5@:CSIZE #1,0,1:size$="2" 


:AT #5,1,14:PRINT #5, 


“i AT #5,0 


(r2e]) Len 
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1690 AT #5,3,1:PRINT #5,"Symbol > 


1920 IF cursor_flag=@ THEN mode$="Draw " 


1669 =51:CSIZE #1,1,1:size$="3" 

1679 =27:GO TO 1702 

1688 END SELect 

1699 WRITE_TO_SCREEN 

17@@ CLS#6 

1719 IF qcomp_flag=@ THEN :AT #4,13,1:PRINT #4," W 
rite ":CSIZE #1,9,0 

172@ OVER cursor_flag 

1730 END DEFine 

174@ DEFine PROCedure QCAD LOGO 

1758 BORDER #5,1,255:PAPER #5,2:INK #5,9 

176 CLS #5:CSIZE #5,9,1 

1770 AT #5,@,1:UNDER #5,1:PRINT #5,"CAD":CSIZE #5, 
@,@: UNDER #5,@:INK #5,4 

1780 INK #5,6 

1799 AT #5,4,1:PRINT #5,"Step 
T #5,d 


>": AT #5,4,10:PRIN 


":AT #5,3,10:PRIN 
1.45: syebel. number 

1818 INK #5,@:STRIP #5,cursor _colour 

1820 AT #5, 2, 1: PRINT #5, col$ 

1838 PAPER #5, 2 

1849 INK #5,2:STRIP #5,6 

185@ AT #5,2,8:PRINT #5,mode$ 

1869 PAPER #5,2 

1879 END DEFine 


1880 DEFine PROCedure CHANGE_CURSOR_MODE 


1894 IF cursor_flag =-1 THEN cursor_flag =@:ELSE c 
ursor_flag =-1l 


(1990 INK #5,2 
-1919 IF cursor_flag=-1 THEN mode$="Move ":STRIP #5 


,6:AT #5,2,8:PRINT #5,mode$ 

:STRIP #5, 

6:AT #5,2,8:PRINT #5,mode$ 

193@ PAPER #5,2 

1949 OVER cursor_flag 

1958 END DEFine CHANGE_CURSOR_MODE 

1969 DEFine PROCedure KEYBOARD_INPUT 

1979 aS=INKEY$(-1):a=CODE (a$) 

1989 END DEFine 

1999 DEFine PROCedure SQUARE_GRID 

2002 INK #1,2:OVER @ 

2910 FOR i °= 2.5 TO rx “STEP 2.5 

2626 LINE i,2.5 TO i,ry 

293@ NEXT i:END FOR i 

2649 FOR i=2.5 TO ry STEP 2.5 , 

2959 LINE 2.5,i TO rx,i 

2069 NEXT i:END FOR i 

2070 INK #1,6:OVER cursor_flag 

2@8@ END DEFine 

2998 DEFine PROCedure BLEEP 

2108 BEEP 10000,1000,10,10,19 

2110 END DEFine 

2126 DEFine PROCedure CLEAR _SCREEN 

aa INK #4, Z2:STRIP #4,6:AT #4,2,1:PRINT #4," 
- INK #4 ,O: PAPER #4 ,4 

2140 AT #6,0,18: PRINT #6," Baeee CY ) 2t6 Ctede Se 

reen” 

215@ KEYBOARD_INPUT: IF a$=="y" THEN 

2168 CLS 

217@ END IF 

2188 CLS#6:AT #4,2,1:PRINT #4," Clear 

219@ END DEFine 

2202 DEFine PROCedure RUBOUT 


Clea 


o2t8 INK #4, Z2:STRIP #4,6:AT #4,3,1:PRINT #4,” Eras 
- PAPER #4 ,4: INK #4 ,@ 
2220 INK #6,2:PRINT #6, Mowe Rubber <>?= : -°R’ 


= Krase = “C* = Cursor Sige : 
2238 REPeat rubber 

2248 IF coordinate_display_flag=1 THEN : display 
2250 OVER -1 

2268 LINE x,y TO x+x_len,y TO x+x_len,y-y_len TO x 
»sy-y_len TO x,y 

227@ KEYBOARD_INPUT 

2280 LINE x,y TO x+x_len,y TO x+x_len,y-y_len TO x 
sy-y_ien TO x,y 

2296 SELECT_INPUT 

2300 IF a$=="E" THEN :OVER @:FILL 1:INK @:LINE x,y 
TO x+x_len,y TO x+x_len,y-y_len TO x,y-y_len TO x 
»y: FILL @: INK cursor_colour 

2316 SELect ON a 

2329 =27:EXIT rubber 

2330 =67,99: CHANGE _RUBOUT_CURSOR_SIZE:LINE x,y TO 


L~-BS¢: -] 


51 





xix ten,y TO x+x_len,y-y lien TO x,y-y ben TO x,y: 
LS#6:PRINT #6," Move Rubber <>?= : ’E’ - Erase 
4 AG = SOUL SOL sor 26 (BSC =) 

2349 END SELect 

235@ END REPeat rubber 
2360 cursor_flag=-1:CLS#6:AT #4,3,1:PRINT #4," Era 
se ; 

2378 END DEFine 

238@ DEFine PROCedure CHANGE _RUBOUT_CURSOR_SIZE 
2399 CLS#6:AT #6,0,9:PRINT #6,"Use Cursor Keys to 
adjust Size. [ ESC J] to Return” 

2440 REPeat cursor_loap 

2410 OVER -1:LINE x,y TO x+x_len,y TO xt+x_len,y-y_ 
len TO x7y-y_len TO <,'y 

2420 KEYBOARD_INPUT 

2430: LENE x.y TO xt+x_len,y TO «+x_len,y-y_l6en- TO =x 
i y_.tern TO s,¥ 

2440 SELect ON a 

245@ =27:LINE x,y TO xtx_len,y TO x+x_len,y-y_len 
TO x,y-y_len TO x,y:EXIT cursor_loop 

2460 =20@:x_len=x_lent+1:I1IF x_len»=4@ THEN x_len=4@ 
2479 =192:x_len=x_len-1:IF x_len<=2 THEN x_len=2 
2488 =208:y_len=y_len-1:IF y_len<=2 THEN y_len=2 
249@ =216:y_len=y_lent+1:IF y_len>=4@ THEN y_len=4@¢ 
2506 END SELect 

2518 NEXT cursor_loop 

2520 END REPeat cursor_loop 

253@ END DEFine 

2548 DEFine PROCedure SELECT_INPUT 

255@ SELect ON a 

2560 =88,128,89,121:IF coordinate_display_flag=% T 
HEN coordinate_display_flag=1:ELSE coordinate_disp 
lay_flag=@:IF coordinate_display_flag=@ THEN :AT # 
5,@,7:PRINT #5," EAL HDG dug ck SHORELINE. Oey 2 


“> END If -- END IF 
2578 =194: d=d-.5: CHANGE_CURSOR_SPEED 
2580 =53:d=5: INK #5,6:AT #5,4,11:PRINT #5," TAL 


#5,4,10:PRINT #5,d 

259@ =2@2: d=d+.5: CHANGE _CURSOR_SPEED 

2620 =192:x=x-d:IF x<2 THEN BLEEP: x=2 

2616 =97,65 :x=x-d:y=y+d: TEST DIAGONAL MOVEMENT 
2620 =2@@:x=xt+d:IF x>g THEN BLEEP: x=g 

263@ =122,9@:x=x+d: y=y-d: TEST_DIAGONAL_MOVEMENT 
2649 =208:y=ytd:IF y>ga THEN BLEEP: y=ga 

2650 =39: x=x+d:y=ytd: TEST_DIAGONAL_MOVEMENT 
2668 =216:y=y-d:IF y<3 THEN BLEEP: y=3 

2678 =73,195: CHANGE COLOUR 

2682 =47:x=x-d: y=y-d: TEST_DIAGONAL_ MOVEMENT 


26990 END SELect 
2782 END DEFine 
2719 DEFine PROCedure CHANGE _BORDER_COLOUR 

2720 INK #4,2:STRIP #4,6:AT #4,1,1:PRINT #4,” Bord 
er ":PAPER #4,4:INK #4, 

2736 AT #6,0,15:PRINT #6," Press < = 
Border Colour” 

2749 REPeat bors 

275@ KEYBOARD_INPUT:IF a<>27 AND a<>192 AND ax<>2@@ 
THEN GO TO 275@:END IF 

2760 IF a=-27 THEN : EXIT bors:END IF 

277@ IF a=192 THEN pc=pc-1:IF pe <=@ THEN LET pc=@ 
:-END IF :END IF 

2780 IF a=2@@0 THEN po=pct1:IF pe »>254 THEN LET pc= 
Z55°R ND ITF =~ 2END IF 

2796 BORDER #1, (pw), (pc) 
2880 NEXT bors 

2818 END REPeat bors 
Z2E29 AT 44, 2251; PRINT 34,” 
2830 END DEFine 

2840 DEFine PROCedure AUTHOR_OF_QCAD QCOMP 
2850 INK #6,6:STRIP#6, 2: authors$=" + 

OMP copyright A.Quinn e 
2860 REPeat title 

2870 a$=INKEY$(5):IF at<> 


[ ESC ] Sets 


Border “?CLS#6 


CAD & QC 


""“THEN EXIT title:END IF 


288@ AT #6,@,9:PRINT #6, authors; : author$=author$(2Z 
TO)& authaor$(1) 

2898 END REPeat title 

290@ PAPER 46,@6:CLS#6: INK #6, 2° 

291@ END DEFine 

292@ DEFine PROCedure WRITE_TO_SCREEN 

2936 CLS#6: INK #6,2 

2949 INPUT #6," Enter Text > 
2959 OVER -1 


"; texts 


52 


2969 CLS#6:AT #6,9,1@:PRINT #6," Move Text to Requ 
ired Position & Press ’ENTER’" 

2978 REPeat loop_write 

298@ IF coordinate_display_flag=1 THEN display 
2998 : 

3089 CURSGRiax4'y5 73, -5: PRINE- texts; 

38108 KEYBOARD INPUT 

3928 CURSOR x,y,—-3,—-5: PRIN? text; 

3830 SELECT_INPUT 

3@490 IF a=-1@ THEN EXIT loop_write 

3@5@ END REPeat loop_write 

3969 OVER @:CURSOR x,y,-3,-5:PRINT text$; 

307G CSIZE #1,9,0 

398@ END DEFine 

3890 DEFine PROCedure DOT_GRID 

3100 INK #1,2:OVER @ 

SLIO*HORDIZ= 2 SeTOrcrs-STEP.2.5 

SiZ@ FOR j = 2.0 TO ry STEP 2.5 

3130 POINT i,j 

3149 NEXT j:END FOR j 

315@ NEXT i:END FOR i 

3166 INK #1,cursor_colour:OVER cursor_flag 

3172 END DEFine 

3188 DEFine PROCedure SET _UP_NEW_WINDOWS 

3199 SCALE 1@0,@,@:MODE 4 

32068 cursor_colour=6:symbol_number=@: cursor_flag=- 
1: g=125: ga=10@: rx=122.5:ry=97.5:x=1@: y=80: pw=1:pc= 
4 

3216 WINDOW #1,411,243,102,0:BORDER #1, (pw),(pc):P 
APER #1,90:CLS#1 

3220 OPEN #Z,scr_:WINDOW #2,512,256,0,6:PAPER #2,2 
>: INK #2,9 

3230 OPEN #4,con_:WINDOW #4,109,200,0,0:BORDER #4, 
1,255: PAPER #4,4:CLS#4 

3249 OPEN #5,con_: WINDOW #5,100,55,@,201:BORDER #5 
,1,255: PAPER +#5,2:CLS#5 

325@ OPEN #6,con_:WINDOW #6,411,12,10@2,244:BORDER 
#6, 1,255: CLS#6 

3268 END DEFine 

327@ DEFine PROCedure REMOVE_GRID 

3280 INK #4,2:STRIP +#4,6:AT #4,11,1:PRINT #4," Rem 
ove ":INK #4,@:PAPER #4 ,4 
3290 AT #6,0,20:PRINT #6," Enter ’Y’ 
qn 

3300 KEYBOARD_INPUT:IF ag$=="Y" THEN 
3310 RECOL #1,9,0,0,0,4,4,6,6 
332@ END IF 

3338 CLS#6:AT #4,11,1:PRINT 34; 
3340 END DEFine 

3350 DEFine PROCedure RUBBER _BANDS 

3360 CLS#6:AT #6,9,2:PRINT #6,"Rubber Bands 
Cursor <>?= { ENTER Jj] Set [ ESC -} Return" 
3378 OVER -1 

3389 xl=x:yl=y 

3398 REPeat loop 

3402 a=-B 

3410 IF coordinate_display_flag=1 THEN display 
3429 CURSOR x, ¥,—3; "57 PRINT “+: SL ENE x? yl TO se;y 
3438 KEYBOARD _ INPUT 

3449 CURSOR x,y,-.3,-5: PRINT 


345@ SELECT_INPUT 

346@ SELect ON a 

3479 =27:EXIT loop 

3480 =10:OVER @:LINE xl,yl TO x,y:EXIT loop 

349@ END SELect 

3592 END REPeat loop 

3516 IF a<>27 THEN GO TO 3379 

3520 CLS#6 

3538 END DEFine 

3549 DEFine PROCedure REMOVE WINDOWS 

3558 BORDER #4,1,0:BORDER +#5,1,0:BORDER #6,1,2 
3560 PAPER #4,@:PAPER #5,@:CLS#4:CLS#5: CLS#6 

3578 END DEFine 

3588 DEFine PROCedure SAVE_DIAGRAM 

3599 INK #4,2:STRIP #4,6:AT #4,12,1:PRINT #4," Sav 
=) “:INK #4,0:PAPER #4,4 

3680 CLS#E 

3619 ENTER_DEVICE 

3620 IF medium$="" THEN GO TO 371@ 

3630 IF ds=@ THEN :GO TO 3670 

3649 IF ds=-? THEN : BLEEP: GO TO 36@@:END IF 

3656 IF ds=-8 THEN :BLEEP:PRINT #6," Already exist 
s ’Y’ to overwrite": KEYBOARD INPUT: IF a$=="Y" THEN 


to Remove Gri 


Remove 


Move 


te Sad Nis. x iy LEO Sey 
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GO TO 366@:ELSE GO TO 36@@:END IF 
366@ DELETE mediums 
3676 CLS#6:AT #6,0,1:PRINT #6," 


>END IF 
Please wait ...... 


3688 REMOVE_WINDOWS 

3698 SBYTES medium$, 131972, 32767 

3728 QCAD_MENU: QCAD_LOGO 

3710 CLS#6:AT #4,12,1:PRINT #4,“ 

3728 END DEFine 

3738 DEFine PROCedure LOAD DIAGRAM 

3740 INK #4,2:STRIP #4,6:AT #4,6,1:PRINT #4," Load 
":INK #4,@0:PAPER #4,4 

3758 CLS#6 

3760 ENTER _DEVICE 

3770 IF medium$="" THEN GO TO 3846 

3782 IF ds=-7 THEN :BLEEP:GO TO 374@:END IF 

3799 IF ds=@ THEN :BLEEP: AT #6,@0,1:PRINT #6,"Does 

not exist - Press a Key": KEYBOARD_INPUT:GO TO 37598 

:END IF 

3890 CLS#6:AT #6,0,1:PRINT #6," Please wait 


Save 


3818 REMOVE_WINDOWS 

3826 LBYTES medium$, 131072 

3838 QCAD_MENU: OCAD_LOGO 

36490 CLS#6:AT #4,6,1:PRINT #4," Load 

385@ END DEFine 

3869 DEFine PROCedure JOIN_DOTS 

3878 1lc=@ 

388@ INK #4,2:STRIP #4,6:AT #4,5,1:PRINT #4," 

“:INK #4,@:PAPER #4,4 

3899 AT #6,0,1:PRINT #6,"Move cursor <>?= [ Space 

tet Enter j-{ ESC }" 

3908 OVER -1 

3918 LET h(@)=x:LET v(@)=y 

3926 AT #6,6,46: INK #6,6:PRINT #6,"Points set >":A 

T #6,0,59:PRINT #6,1c 

3938 REPeat loop 

3940 IF coordinate_display_flag=1 THEN :display:EN 

D IF 

3950 CURSOR x,y,-3,-5:PRINT "+"; 

3968 KEYBOARD INPUT 

3970 CURSOR x,y,;-3,-5:PRINT "+"; 

3986 SELECT_INPUT 

3999 IF a=32 THEN OVER @:POINT x,y: OVER -1:lce=lctl 

sh(lc)=x:v(le)=y:AT #6,0,59:PRINT #6,1c:1IF Ilc=19 T 

HEN :LET a=10:END IF :END IF 

4@@@ IF a=1@ AND lc=Z THEN : OVER @:LINE h(1),v(1) 

TOs Gly tts (C19) ). DIV 23) IO hc Ty tx Ch C1099 

DIV Z2,y TO x,y:GO TO 4@4@:END IF 

4910 IF a=1@ AND l|lc>2 THEN : OVER @:INK cursor_colo 

Ur POR f=1-TO Tc-i LINE. bCLy VG? TO RUF L) viird) 

:NEXT i: END FOR i: BLEEP: GO TO 404@:END IF 

4920 IF a=27 THEN EXIT loop 

4930 END REPeat loop 

4940 INK #6,2:CLS#6:AT #4,5,1:PRINT #4," 
":OVER cursor_flag 

4950 END DEFine 

4062 DEFine PROCedure ARCS BOXES CIRCLES 

4970 CLS #6:AT #6,0,15:PRINT #6," Arcs 

cles  -° Enter Prefix" 

4980 KEYBOARD INPUT: IF a=27 THEN GO TO 41498:END IF 


49396 IF a<>27 AND a<>97 AND a<>99 AND a<>96 AND ax 

765 AND a<>66 AND a<>67 THEN.:BLEEP :GO TO 40c9:EN 

D. IF 

4100 IF a=97 OR a=65 THEN DRAW_A CURVE:END IF 

4110 IF a=99 OR a=66 THEN DRAW _A CIRCLE:END IF 

41206 IF a=98 OR a=67 THEN DRAW_A BOX:END IF 

4130 OVER cursor_flag 

4142 CLS#6 

415@ END DEFine 

416@ DEFine PROCedurs DRAW_A_CURVE 

4170 cl=0:c=@:hl=x:vl=y:INK cursor_colour:OVER -1 

4188 CLS#6:AT #6,0,8:PRINT #6," Arcs Move Cursor 
<>?= [ Space to Set end Point J" 

4199 POINT x,y 

420@ REPeat loop_curve 

4210 IF coordinate_display_flag=1 THEN : display 

AZ20 CURSOR x, y5—-35—5: PRINT "+"; 

423@ KEYBOARD INPUT 

aZAo ‘CURSOR ox, 9-375; PRINT: "+" ; 

425@ SELECT_INPUT 

4260 IF a=1@ THEN : OVER cursor_flag: EXIT loop_curv 

e:END IF 


Join 


Join 


Boxes Cir 
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es IF a=32 THEN :POINT x,y:EXIT loop _curve:END I 

428@ NEXT loop_curve 

4299 END REPeat loop_curve 

4300 CLS#6:AT #6,8,1@:PRINT #6,” Arcs 
[ ENTER to Set Curve & Return ]" 

4310 REPeat loop_curves 

4320 KEYBOARD INPUT 

4338 OVER -1:ARC hi1,vl TO x,y,c 

4340 IF a=1@ THEN : EXIT loop_curves:END IF 

435@ IF a=192 THEN LET cl=.1:END IF 

4360 IF a=200 THEN LET cl=-.1:END IF 

437@ c=ct+cl 

4380 ARC hl1,vl TO x,y,c 

4399 NEXT loop_curves 

4400 END REPeat loop_curves 

4419 OVER @:ARC hl,vl TO x,y,c:FILL @: OVER cursor_ 

flag 

4429 CLS#6 

443@ END DEFine 

4440 DEFine PROCedure DRAW_A_ CIRCLE 

445@ CLS#6:AT #6,0,8:PRINT #6," Circle : 

>? [-Shift <= } [ ENTER ] to Set" 

446@ cir=9:rd=1:tilt-@ 

4470 REPeat loop_circle 

4480 KEYBOARD _INPUT 

4499 OVER .=-1: CIRCLE x,y ,ciz, rd, tilt 

4509 IF a=-1@0 THEN : EXIT loop _circle:END IF 

4519 IF a=216 THEN : rd=rd-.1:1F rd>1i THEN rd=1:EN 

D If. -: END If 

4520 IF a=192 THEN :cir=cir-1:END IF 

4539 IF a=2@8 THEN : rd=rd+.1:IF rd<.i THEN rd=.1: 

END IF :END IF 

4540 IF a=20@ THEN :cir=cirt1:END IF 

4550 IF a=196 THEN :tilt=tilt+.1:IF tilt>180 THEN 


Press < = 


Press <= 


4380 ARC hl1,vl TO x,y,c 

4390 NEXT loop_curves 

4496 END REPeat loop_curves 

4419 OVER @:ARC hl,vl TO x,y,c:FILL @: OVER cursor_ 
flag 

4422 CLS#6 

443@ END DEFine 

4449 DEFine PROCedure DRAW_A_ CIRCLE 
445@ CLS#6:AT #6,0,8:PRINT #6," Circle : 
>t {| SHLiEt <= J] °£. ENDER’ } to Set" 

44690 cir=@:rd=1:tilt=@ 

4476 REPeat loop_circle 

4489 KEYBOARD _INPUT 

4490 OVER: ~1: CIRCLE: x,y, cir, rd,tilt 
4500 IF a=1@ THEN : EXIT loop_circle:END IF 

4510 IF a=216 THEN : rd=rd-.1:I1F rd>1 THEN rd=1:EN 
D IF :END IF 

4520 IF a=192 THEN :cir=cir-1:END IF 

4530 IF a=208 THEN : rd=rd+t.1il:IF rd<.i THEN rd=.1: 
END IF :END IF 

45490 IF a=20@ THEN :cir=cirtil:END IF 

4550 IF a=196 THEN :tilt=tilt+.1:IF tilt?>1606 THEN 
tilt=18@0:END IF :END IF 

4560 IF a=204 THEN :tilt=tilt-.1:IF tilt<@ THEN ti 
1t=@:END IF :END IF 

45/0 CERCLE X..0¥,Cizg, 2a, tile 

458@ NEXT loop_circle 

4596 END REPeat loop_circle 

4600 OVER @:CIRCLE x«,y,cir,rd,tilt:OVER cursor_fla 


Press <= 


g 

461@ CLS#6 

4629 END DEFine 

4630 DEFine PROCedure DRAW_A_BOX 
4640 CLS#6:AT #6,0,18:PRINT #6, "Box : 
ER ] to set Box” 

4650 hr=8:vr= 

4669 REPeat loop_box 

4678 KEYBOARD_INPUT 

46806 OVER.-—1:LIENE -x«,y TO.xthr,y TO «xthr,ytvr 10, x, 
ytvr TO x,y 

469% IF a=10 THEN : EXIT loop_bax:END IF 

476@ IF a=192 THEN hr=hr-1:END IF 

4710 IF a=26@ THEN hr=hr+1:END IF 

4720 IF a=208 THEN vr=vr+1:END IF 

4736 IF a=216 THEN vr=vr-1:END IF 

4749 LINE x,y TO «thr, y TO: xthr5yt+vrclO xsytvr. TO 


x,y 


<o?2=. J ENT 
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4759 NEXT loop_box 

4762 END REPeat loop_box 

4778 OVER @:LINE x,y TO xthr,y TO sehr ytyvr TOs. 7 
+vr TO x;y 

478@ OVER cursor_flag 

479% CLS#6 

4800 END DEFine 


This is the final part of our space 
saga of mystery, suspense and 
intrigue spread across several 
galaxies and two issues. The game 
is based on the popular idea of a 
galactic Empire divided into two 
warring camps — the Imperial 


Empire. Who said History never: 
repeats itself? 


before running it. 


forces and rebel fighters. 

Using largely text and adven- 
ture problems, the object of the 
game is to lead the rebel fighters 
to victory and form the second 


10110 
Oo 

10120 

10130 


7O(i,1),co(i,2),p, (INT(CRND(6 TO 14))/190) 


10135 
10140 
10150 
10160 


=cl+is 


10170 
101890 
L999 
20000 
20010 


INK. 46:FILL i1:CIRCLE co (i,1),co(i,2), .SsFILL 


pl(id)=INTCRND(1 TO 3)) : 

FOR p=2 TO pl(id+i:s INK RND(S TO 6): CIRCLE 
»>RND (2) 
noleeoi +9 

END FOR i 

INE 6:CSIZE 3,0:cl=49:cl$="1":OVER -1 

FOR i1 TO 29 STEP 1.92AT 16, isPRINT clssectl 
cl1$=CHRS$(cl): IF cl=57 THEN cl=96:END FOR i 
OVER O 

END DEFine 


DEFine FROCedure initialies 
DIM des$(15,55):DIM pl(15):DIM co(15,2):DIM 


name$ (15,15) 


20015 
>:DIM 
20016 


1:end_. 


20020 
20030 
ZOOS 
20040 
20050 
GO TO 
20060 
20070 
20080 
2O090 
20100 
20110 
20120 
26122 
20725 
ELSE 
20126 
29127 


DIM nam1(30):DIM cat#(30,15):DIM cati$(12,55 
ar (15) 
DIM (16): 


tot_h=0: tot_c=0: 


DIM dep (iS) :gol= 
g=0 
RANDOMISE 
RESTORE 32000 
FOR i=1 TO 30:READ cat#(i):END FOR i 
FOR i=1 TO 15 

al=INT (RND (1 TO 30)):IF nami(al)<>0 THEN 
20050 

nami (al)=1:name$(i)=cat$(al) 
END FOR i 
RESTORE 32030 
FOR i=1 TO 12s 
FOR i=1 TO 15 
al=INTC(CRND(1 TO 12)) 

des#(id=catist(al) 

Prn=INTCRND(25 TO 95)) 

IF al«>1 AND al<>7 AND al<>8 THEN ar(id=rn: 
rn=o 

#(i)=al 

IF al=4 OR al=6 OR al=i2 


READ cati%(i):END FOR i 


THEN tot_h=tot_htr 


ms ELSE tot_c=tot_ctrn 


20130 
2013 35 
SOL40 
29150 
£2160 
20170 


ase)< <> 
9 AND f (base) ¢ 


20998 
20999 
21000 
21005 
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END FOR i 

IF tot_h<200 THEN GO TO 20010 

year= =65891.74 

Pprob=INT((100/ (tot_ht+tot_c))*tot_h) 

devel _h=0 

base=INT(RND(1 TO 15)):IF (base) <¢>1 AND f(b 
= AND f(base)<>7 AND f(base)<>8 AND f (base) < 
710 THEN GO TO 20170 

END DEFine initialise 


DEFine FROCedure f_level 
BEEF 1000,5 





The game must be played in 
lower case. When you have typed 
it in, save it to Microdrive or disc' 
then type WINDOW 512,256,0,0| 


21019 


21030 


an alee Se! 


UTION":CS 


210230 
21940 


FARER O:BORDER 5,5:CLS 

INK 2,4:CSIZE 3,1:AT 0,7:PRINT "COSMIC REVOL 
IZE 2,0 

INK 7 
AT 3,2 


SINFUT “PLEASE ENTER SKILL LEVEL .<(1 TO 


4q)d:i"slev 


21050 
=1060 
21665 
Z1O067 


REEF 1000, 20 
IF lev¢1 OR lev>4-THEN GO TO 21010 
CLS 


INK 2,4:CSIZE 3,1:AT O,7:sPRINT "COSMIC REVOL 


LITION":CSIZE 2,0 


Z1a79 


INI 6:UNDER 1:AT 2,0:FRINT “THE CURRENT SITU 


ATION: ":UNDER 0 


2 LOBO 


INE 42: AT 4,2:FRINT “NAME":SAT 4,19: FRINT “DES 


CRIFTION" 


2LOPO 
21100 
21105 
21110 
2l120 


INK 2 

FOR i=1 TO 15 
If i/2=INT(i/72) THEN INK 
AT it+t5,0:PRINT name#(i) 
IF fi) < <10 AND #¢(1)<>9 AND €¢(1)<>1 AND Fi 


StELSE INK 2 


232 AND £¢(1)<>8 AND £¢1)<>7 THEN AT i+5,17:FRINT 


das$(i?sELSE AT i+5,17:PRINT 
21140 


21150 
21160 
e2LL7O 
21180 
Pig hh hr 
22000 
22010 


22020 


"NO INFORMATION" 
END FOR i 

INE 7s AT 23, 9sPRINT 
PAUSE 40000 

BEEF 1000,10 

END DEFine 


"PRESS ANY KEY TO PLAY" 


DEFine PROCedure end_game 
TAPER QO:BORDER 5,5:CLS 
CSIZE 3,1: INK 2,6:AT O, 


1:FRINT “THE EMPIRE H 


&S BEEN RE-FORMED" 


22030 CSIZE 2,0: INK 2 
2040 AT @,2:PRINT "THE SECOND EMPIRE HAS BEEN FOU 

NDED BY" 

22045 INK 3 

22050 IF tot_h>tot_c THEN 

22060 AT 10,11:FPRINT "THE REBEL FORCES" 

seo INK S:FLASH 1:AT 12,15:FRINT "WELL. DONE":FL 
SH 0 

ree END IF 


22090 
22100 
22110 
ED We 
22120 


Fas as 


SECOND 


an Nes | Sue bese. 
a3 45 - 
FRINT 
2124 
PRINT 


£2130 


TO FLAY 


ee 140 
22 LO 
2216 


22160 
31999 


32000 DATA 
enta", 


22010 
dcock: 
Heka" 

S2020 


Rag toe 


‘s Star", 


IF tot _c+tot_h THEN 
AT 10,190:PRINT "THE IMPERIAL FORCES" 
INK S:FLASH 1:AT 12,12:FRINT "YOU HAVE FAIL 


:FLASH 9 


BMD ae 

INK &:AT 16, 0:FRINT 
FOUNDATION?" 

INE. 4: INFUT FOUND? 

IF nanes (base)=FOUND$ THEN INE 7,2:AT 19,12: 
"YOU ARE CORRECT" 

TT names (base) <>FOUNDS THEN INE 7,2:AT 19,4: 
"YOU ARE WRONG, IT WAS ON “"sname% (base) 

lidk 7eCSIZE 3,0sAT 22,2:PRINT “PRESS ANY KEY 
AGAIN" 

PAUSE 40000 

BEEP 10000,10 


"IN WHICH SYSTEM IS THE 


Cc END DEFine 


END DEFine 
Caroli. “M 
"Thuban 


"Xantor", "Capri", "Alce", "Cor 
"Canopus", "Baltair", "Fhakt", "Rantor", 


DATA "Zibal “4 “Di 


"Frontus"," 


"ken Tor", "Eltanin”, 
"Pollux", "Sarin", 


"Danko", 
"Nihal", 
Pana bat’ 

DATA "Sirrah Alpha", 
"Gigantu", "Hinter", 


"Sirrah Beta", 
"Janx", "Psion", 


"Antares", 
"Lacert 


= ."Optika" 


2030 


eat life.", 


22040 
st." 

22050 
22060 
wattI7O 


ii) 


~2060 


ent species.", 
rned." 


a2 OPO 


DATA "System UNINHABITED by intellig 
"System's INHABITANTS unknown." 

DATA "An IMFERIAL out post.","A REBEL out po 
DATA 
DATA 


DATA 


"An IMPERIAL colony.","A REBEL colony." 
"The System is devoid of all EIFEs 
"System INHABITED by low forms of life. 


DATA “System INHABITED by an intellig 
"The Whole system is internally gove 


DATA "An IMPERIAL base.","A REBEL base." 
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umber _4; °° 2°" -Af §,.19: PRINT" ?" 
1630 AT 5,19:INPUT answers 
1649 IF answer$<"@" OR answer$>"999" THEN GO 
TO 1620 
165@ IF answer%=number_3*number_4 THEN co 
rrect_marker= correct_marker+1: goo 
d_news: correct:ELSE bad_news: wrong 
: ‘ . : teach number_3,number_4:wait 
Following our appeal for educa- tional programs, SO if you have 1668 END FOR counte: 
tional software, we received this written any educational software 1678 CLS 
program which helps to teach you think might be suitable, send 1689 at-DATE$:end_time$=a$(16 TO 20) 
children their multiplication tab- it to The Progs. fc a ‘end_time#(1 TO 2)- time_now 
les. We are still looking for educa- 1720 time_elapsed=60*(end_time$(1 TO 2)-time_ 
now$(1 TO 2))+ end_time$ (4 TO 5)-time_now$(4 
TO=5) 
1870 MODE 8:CSIZE 1,1:PAPER 2:INK 7: : 1710 faeantourract _marker ) 
1989 AT 5,11:PRINT”"QUIZ":PAUSE 58 3 1729 AT 9,1:PRINT"You took "! time_elapsed!" seconds. 
1998 PAPER 6:INK 1:CLS 1738 STOP 
1100 PRINT"Which table <1..12>" 174@ END DEFine 
1110 PRINT: PRINT"Or <A>ny table“ 175@ DEFine PROCedure correct 
1120 PRINT: PRINT“Input your choice..." 1760 AT 7,8: INK 2:FLASH 1:PRINT “Well do 
1130 PRINT: INPUT choices ne!":PAUSE 100:FLASH @: INK @ 
1140 IF choice$>="1" AND choice$<= "12" THEN 177@ END DEFine 
specific_tables (choicest) 1769 DEFine PROCedure wrong 
115@ IF choicet="A" OR choice$="a" THEN any 1799 AT 7,5:INK 2:FLASH 1:PRINT "No. Wai 
_table:ELSE GO TO 1099 t for help!" : PAUS E 180 :FLASH @: INK @ 
116@ REMark *** specific table *** 18@@ END DEFine’ 
1170 DEFine PROCedure specific_tables (choices 1810 REMark sound - if wrong 
1188 LOCal a$,time_now$,end_time$, correct_ 1620 DEFine PROCedure bad_news 
marker ,mark,number_1, number_2 1830 FOR j=1 TO 255 
1199 DIM number(1@) 1849 BEEP 590, j 
120 at=DATES: time_now$=a$(16 TO 20) 185@ END FOR j 
1219 correct_marker=@ 1869 END DEFine 
1220 FOR counter=1 TO 1@ 1870 REMark sound if correct 
1230 CLS:mark=@ 1880 DEFine PROCedure good_news 
1249 mumber_1=choice$:number_2=RND Ch 16.4 1699 FOR j=108 TO 4260 STEP 58d 
2) 1990 BEEP 5@00,j:PAUSE 5 
125@ FOR check=1 TO counter 191@ END FOR j 
1260 IF number_2=number (check) THEN mark=1 1920 END DEFine 
:EXIT check 193@ REMark draw faces 
1276 END FOR check 194@ DEFine PROCedure faces(count) 
128 IF mark=1 THEN LET mark=@:GO TO 12490:EL 1959 CLS 
SE number (check) = number _2 1969 AT 1,1:PRINT"You got “;count;" of them right," 
1290 AT 5,7:PRINT number_1;" "; ia Semen cS 1979 increment=@: radius=7 
mber 25" = <"sAT 5259: PRINT “?" 1988 FOR n=1 TO count 
1396 AT 5,19:INPUT answer$ 1999 CIRCLE n*tradiustlt+tincrement, 69 ,radius 
1310 IF answer$<"“®" OR answer$>"999" THEN GO 2006 ARC n*radius'ltincrement- 2.6, 58 TO n 
TO 1299 *xradiustltincrement+2Z. 6 Ao}: we calf 
1320 IF answer$=number_1*number_2 THEN co 201@ POINT n*¥radiustl+tincrement-Z, 62:POIN 
rrect_marker= correct_marker+1l:gvo T ntradiustl+incremenL+ 2,62 
d_news: correct: ELSE bad_news: wrong: 2ZO2@) =increment=incrementt+radius+2 
teach number_1,number_2:wait 203@ END FOR n 
133@ END FOR counter 2048 AT 5,1:PRINT” and ";18-count; “ of the m wrong.” 
1348 CLS 2950 increment=@ 
135@ a$=DATE$: end_time$=a$(16 TO 2@) 2066 FOR n=1 TO 1@-count 
1362 minutes=end_time$(1 TO Z)- time_now 20706 CIRCLE ntradiust+tl+increment, 2a »radius 
SXel TO’ 2) 2@8@ ARC n*radius+l+increment- 2.6, 16 TO n 
1370 time_elapsed=60*(end_time$(1 TO Z)-time_ *radiust+t1l+increment+2.6 1G, PS 
now$(1 TO 2))+end_times (4 TO 5)-time_nows(4 2092 POINT n*radiust+ltincrement-2Z, 22: POIN 
eae E : ee T ntradius+lt+increment+ Zy:22 
aces (correct_marker oe = + nus+3 
1390 AT 9,1:PRINT"You took "! time_el oh cae eae eee 
apsed!" seconds."! 2120 END DEFine 
1400 STOP ; 2130 DEFine FPROCedure teach(n1,n2) 
oa20 END DEFine 2148 CLS:CSIZE 9,9 
142@ REMark *** Any table *** 2150 AT 1,1:PRINT"’To work out “!n1! "3 "Lan? 
1430 DEFine PROCedure any_table i"-"-. PRINT 
144@ LOCal a$,time_nows,end_time$, correct_ 2168 FOR j=1 TO nl 
marker ,mark 21/0 FOR k=1 TO n2 
1450 DIM n3(19),n4( 12) 2180 PRINT "*""; 
1460 a$=DATES: time_now¥=u$(16 TO 26) 2199 END FOR k: PRINT 
1479 correct_marker:@ 220@ END FOR j 
1462 FOR counter=1 TO 190 2210 AT &S,17: PRINT” There are ";n1:AT G, 17: PRI 
1499 CLS NT lots of ec FE e te Gea AT 7,17:PRINT"I£ you 
1508 mnumber_3=RND(1 TO 12) count all" 
1516 mark-% 2226 AT 8,17:PRINT"the stars, you":AT 9,17: PRI 
152@ FOR check=1 TO counter NT“will find that":AT 12 ,17:PRINT"there are " 
1530 IF number_.3=113(check) THEN mark=1] >nl*n2:AT 11,17: PRINT"of them." 
:EXIT check 2230 AT 12,17:FLASH 1:PRINT"So:":AT 14,17:UN 
1546 END FOR check DER 1:CSIZE 2,1:PRINT nl on23° = ndene 
1550 IF mark=1 THEN LET mark=@:GO TO 1540: EL -FLASH @: UNDER @:CSIZE. g, a 
SE n3(counter )=number_3 2249 AT 17,17:PRINT"Press any key. 
eee hipaa alah TO 12) 2258 CSIZE 2,1 
1578 mark=0 2269 END DEFine 
158@ FOR check=1 TO counter ‘ 
1599 IF number_4=n4(check) THEN mark=1 So ene ae ean” ae © 
:EXIT check 229® REPeat loop 
16090 END FOR check 2300 at-=INKEYs 
161@ IF mark=1 THEN LET mark=@:GO TO 1560: EL 2312 IF at<>"" THEN EXIT loop 
SE n4(counter )=number_4 2D 
1626 AT 5,7:PRINT number_3;"  "; "x "Gn cletertaee tet aaa 
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QL-related hardware, 


software and service 
index 


HARDWARE 


ABC Electronic 

010 49 521 890881 

Mouse 

Astracom 

0792 473697 

Modem 

Cambridge MicroElectronics Ltd 
0223 314814 

Q-Prom Eprom Programmer 
Care Electronics 

0923 672102 

Phillips and other monochrome monitors 
Chromagraphica 

04012 4699 

High resolution monitors 
Commpak Data 

0792 473697 

Astracom 1000 

Computer Supplies 

146 Church Road, Boston, Lincs. 
Joysticks 

Compware 

0270 582301 

Disc Drives, Memory, Monitors 
CST 

0438 352150 

Thor, Qdisk/IEEE Interfaces, Drives, RAM, 
Winchester, Eprom Programmer, Q +4 
Cumana Ltd 

0483 503121 

Disc Drives/Interface 

Data Distributors Ltd 

0990 28921 

Kaga, Sinclair Vision 

Datalink 

031 554 6040 

Printer Interfaces 

Eidersoft 

0708 851099 

QL Mouse, Disc Drives 
Farmintel Ltd 

0234 219814 

QLT, Disc systems, SuperQboard, RAM boards 
Tony Firshman Services 
01-267 3887 

Mains Spike Filter 

4 Systems 

01-844 1399 

Hardware and Software 
Kempston Ltd 

0234 850633 

DisclCentronics Interface 
Management Science ltd. 

17 West Hill, London SW18 

OL Case 


MICRO 








ADS 


HARDWARE 


Micro Peripherals Ltd 

0256 473232 

Disc Drives/Interfaces 
Microworld 

0293 545630/0273 6711863 
Printers and Monitors 

Miracle Systems 

0272 603871 

Expanderam 512K 

Modem House 

0392 69295 

Opus Supplies Ltd 

Redhill 65080 

PCML Ltd 

0372 67282/68631 

QL & RAM cards. 

Penman Products Ltd 

0903 209081 

Penman plotters 

Printerland 

0484 514105 

Printers 

Silicon Express 

0533 374917 

Disc interface/drives, Centronics interface, 
RAM boards, Monitors, Printers 
Slave Software 

050 846 8866 

Q Disc 

SMC Supplies 

01-441 1282 

Joystick Adaptor, Centronics and Epson 
Serial 

Strong Computer Systems 
0267 231246 

Printers and Monitors 

T.K. Computerware 

0303 812052 

Stockist 

Tandata 

06845 68421 

Q-Connect, Q-Mod, Q-Call 
Technology Research Ltd 
0784 63547 

Disc interface with RAM and Centronics port 
Transform Ltd 

089 283 4783 

QL dust cover, Microdrive. storage box RS232 
lead, disc drives, monitors and printers 
Viglen C\ mputer Supplies 
01-8112 9902 


ABC Electronic 

010 49 521 890881 

Giga — Basic 

Adder Publishing Ltd 
0223 277050 


Q_Doctor, Macro-Assembler, Advanced 
User Guide 

Anglo Services Ltd 

0705 671421 

Eprom Programmer 

Ark Distribution 

01 863 1861 

QLIIBM Compatible Cardfile, Mailfile and 
Librarian 

Breakthrough Sofware 

0763 45482 

Multi-Tasking Print Spooler, on-line 
SuperBasic Manual 

Bridgebrook Intek 

45 Burleigh Avenue, Wallington, Surrey 
Bank Manager, Diary Manager, Thought 
Manager 

Business Software 

01-863 1861 

Cardfile, Mailfile, Librarian 

Camel Products 

0223 314814 

Q-PROM Eprom Programmer 

Collins Soft 

Freepost, 30, London W1E 7JZ 
Decision Maker, Entrepreneur, Project 
Planner 

Compugem Ltd 

01-731 7948 

Master Blaster 

Computer One 

0223 862616 

Pascal, Forth, Assembler, Typing Tutor 
Monitor|Disassembler 

Compware 

0270 582301 

Retail, SuperBasic extensions 
Consumers Association 
Subscription Dept, PO Box 44, Hertford, 
SG14 1SH 

Taxcalc (on subscription) 

C.P. Software 

10 Alexandra Road, Harrogate 

Bridge Player 

D. A. Bandoo 

81 Mount Pleasant, Wembley 
Assembler, Screen Editor 

D. J. Walker 


22 Kimptons Mead, Potters Bar, Herts EN6 


3HZ 

QLIOPD File Transfer 

D. S. Enterprises 

01-671 0209 

Sign Designer, RAM disc software 
Data Management 

0904 760351 

Sbutil, Mbackup, Terminal, Chargen, 5B 
Extras, FM 

DataGEN 

0989 67469 





Packages for solicitors, accountants, video 
libraries, double glazing sales & credit 
control 

Datalink Systems 

097081 360 

CAD PAK, 3D Slime 

Datalink U. K. 

031 554 6040 

Ser/Par converter, Printer Lead, Joystick & 
Adaptor 

Digital Precision 

01-527 5493 

QL Super Sprite Generator Games Designer 
Monitor & Dissambler, QL Super 
Backgammon 

Eye-Q, Supercharge, Super Media Manager, 
Superforth, Super Astrologer, Professional 
Astrologre, Reversi, Arladia 

D. J. W. Software 

11 Pound Close, Bramley, Hampshire, 

RG26 5BL 

Joysticks 

D. R. K. Products Ltd 

Bar 1, Pipers Lane, Markyate, St. Albans, Herts 
AL3 8QF 

Micro Cartridge Rack 

D. S. Enterprises 

01-671 0209 

Retailer, Sign Designer, RAM Disc 
Eidersoft 

0708 851099 

QL Art, Zapper, QSpell, Archiver, B] IT & Ill, 
Citadel, Spook, Ice, Integ Accounts, Karate, 
Choice, Artice, Toolkit, Presenter 

Eigen Software 

45 Bancroft Road, Widnes, Cheshire WA8 OLR 
Gobble Gobble 

English Software 

061 835 1358 

Hyperdrive 

Eprom Services 

0532 667183 

Ser/Par converter, Eprom cartridge/software, 
cables 

Equate 

2 Ffordd Derwyn, Penyffordd, Chester CH4 
Ot 

Calendar. Draughts, MI_F_OR, Mined Your 
Path, Snake, Solar Invaders, Wall Breaker 


Gemini Marketing 

0395 265165 

Life/Business Organiser, Executive Adventure 
G. §. T. Cofmputer Systems 

0954 81991 

QL Assembler, 681K/OS, Macro Assembler, 
QL C Compiler 

Hisoft 

0582 696421 

Mon QL, Devpack QL 
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HARDWARE 


Intek Software 

01-500 8534 

Maxim 

J. & D. Software 

3 Alfred Road, Lowton, Warrington 

Key Software 

0703 695182 

Flight Simulator, Early Learning 
Labochrome 

173 Rue De Fragnee B-4000 Liege, Belgium 
Baron Rouge, Gwendoline 
Management Science Ltd 

17 West Hill, London, SW18 

Travel Case 

Maurice Computers 

Apartment 6, St Maurices House, 

36 Heworth Green, York YO3 7TA 

QL Stockmarket Investor 

McGraw-Hill 

0628 23431 

68000 Assembler Language Programming 
MetaComCo (272 428781 

Macro Assembler, BCPL, Lattice C, 
Cambridge Lisp, ISO Pascal, APL 
Microprocessor Engineering Ltd 
Hanley Road, Southwater, Horsham, Sussex 
QL Terminator, Emulator 
MicroApl 

01-622 0395 

Microdeal 

0726 68020 

Lands of Havoc, Hopper, Cuthbert, Crazy 
Painter. 

The King, Aquanaut 471, QL Flight 
Micr_A_Soft 

0204 29643 

Design Board II, Q Print, Art Master, Las 
Vegas 

Miracle Systems Ltd 

0272 603871 Ex210 

ExpanderRAM, Modaptor, Ser1/Par 
converter, Joysticks, RAM disc, screen dump 
N. Alexander 

53 Allen Road, Wolverhampton, West 
Midlands 

C Library 

New Horizons Software 


Fourwinds, 30 Cwm Lane, Rogerstone, Gwent 


Chomper, Zfred, Golf, Stranded, Collector, 
Football, Breakout, Programs 1,2,3 


Owl Computer Training 

044 282 7302 

Business Training Courses 

Paddy Software 

0726 832718 

Q REVision, Q_PHYS, Q_CHEM, Q_HIST, 
Q_VERB 

Palantir Products 


60 St Lukes Road, Bedminster, Bristol 
Inkwell (font editor/printer utility) 





Corrupted masters? What are they! 


QL BACKUP SUITE V5.1 


New Byte/byte mdv duplicator. 4 mat with password, transfer files to mdv/flp/fdk. 
View mdv map detect invisible files, dates & file len. Swap strings in file. Use 
relocatable EPROM’s from mdv. + “Fancy” window editor. 100k+. 


£9.95 to Steve Jones 


ZITASOFT 
93 FOXBOURNE RD, LONDON SW17 8EN 


PS Doctors & NURSES coming soon!! 


PCS 

8 Oakgrove Way, Bridgewater, Somerset 
PCS Utilities 

PCML Ltd 

0372 67282 

Q+ Disc Systems and RAM boards 
Peakcrown Ltd 


4 Beeby Road, Scraptoft, Leicestershire LE7 


9SG 

Squadrons 

Peak Electronics 

32 Clifton Avenue, Hartlepool, Cleveland 


- QL Colour Quest 


Plantir Products 

60 St. Luke St, Bedminster, Bristol 
Ink-well 

Portfolio Software 

PO Box 15, London SW11 
Position Computing 

0554 759624 

Hi-Res Screen Dump 

Prentice Hall 

0442 58531 

The C Programming Language 
Printerland 

0484 513105/687875 

Psion Chess, Metacomco Assembler 
Prospero Software 

01-741 8531 

Pro Pascal, Pro Fortran-77 

Psion 

01-723 9408/0553 

Quill Abacus, Easel, Archive, Psion, Chess, 
Organiser 

Pyramide 

01-349 2794 

Wanderer, Neucleon, Othello, Mortville 
manor, Vroom, QL Peintre 


QCode 

0235 28359 

QCode Terminal, Modaptor, Modem, 
Assembler, RAM disc, Games 

Qflash 

Hamburg 6512742 

RAM Disc 2.4 

Q Jump 

0954 50800 

QEP III Eprom Programmer, OTK II Super 
Toolkit, QMON Monitor, QRAM Utilities, 
QFLP Upgrade 

QSoft 

01-559 7417 

Agenda Diary 

Quest 

04215 66488 

Business Accounts, Cash Trader 
Realtime Software 

(532 458948 

Knight Flight 










Rubicon 

0742 583665 

Dragonhold 

S. & B. Software 

20 St Nicholas Street, Diss, Norfolk 
Fantasia Adventure 

Sector Software 

45 Cheetham Meadow, Moss Side, Leyland, 
Lancs PR5 3UB 

Shadow Games Try 0296 668740 

Paint Master, Area Radar Controller. Space 
Paranoids 

Guard and Galactic Invaders, Night Nurse, 
Blast Buggy, Quazimodo, Star 

Slave Software 

050 846 8866 

Arable Farmer Software 

Smiling Software 

26 Dale Road, Marple, Stockport SK6 6HA 
Toolkits (for Icons, Characters, Games) 
Software Atelier 

POB 148/8002, Karakoy, Istanbul, Turkey 
Project Management, 3D Space Trusses, 2D 
Rigid Frames 

Software 2000 

Oxford House, 258 Garstang Road, Preston 
PR2 4QB 

VI 52 Emulator, Textronix/Westward/VT52, 
Utilities 

Solent Systems 

0983 865694 

Tasword to Quill transfer 

Stevenson & Partners 

0428 51500 

Integrated Maintenance Planning/Stock 
Control 

Strong Computer Systems 

0267 231246 

Retailers, Astrocom Modem, QCAD Graphics 
Super Plant Software 

097 423 223 

Plant and gardening software 

Swansoft 

164 Vicarage Road, Morriston, Swansea, 
Space Trek 

Talent Computer Systems 

041 552 2128 

Skul, West, Graphic QL, Lost Pharob, 
Asembler/Workbench, Cartridge Doc 
Technigl 

TDI Software Ltd 

0272 742 796 

USED Pascal, USCD Fortran 77, Advanced 
Development Toolkit, USCD P-System, USCD 
Prolog 

TR Computer Systems 

093 924 621 

QL Payroll 

Transform Ltd 

01-658 6350 


xkx* U.S.A kx 


We have purchased the complete American inventory of 
American QLs from Sinclair Research and now hold the sole 
distribution rights. 

We are looking for hardware and software products for our 
dealers in the U.S. 


A + COMPUTER RESPONSE 

69B ISLAND ST., KEENE N.H. 03431 U.S.A. 
Tel: (603) 357 1800 

Telex. 6502946407 via MCI/WUI 

(Western Union International) 


AMERICAN DEALER ENQUIRIES WELCOME 





Mailing List, Stock Control, Diary, Qspell, 
Calculator, Switch, Toolkit, Archive 
Programming, Payroll, Sage Accounts, key 
Define, Tropic Software 

Tropic Software 

09274 27497 

Bongolia Escape 

Virgin 

01-727 8070 

QL Scrabble 

WD Software 

0534 81392 

WD Morse Tutor, REF QL 7 

Xenon 

24 Wharncliffe Street, Barnsley, West 
Yorkshire S70 6BP 

Poolswinner version 2.0 

ZitaSoft 

Steve Jones, 93 Foxbourne Road, London 
SW17 8EN 

QL MDV Backup 3.0 


Computer Repair Centre 

0379 52588 

QL Repairs 

Data Printing Services 

25 Seymour Road, Bath, BA1 6DY 
Print Quill Documents Dot/Daisy 
Owl Computer Training 

044 282 7302 

Business Training Courses 
Quanta 

0908 564271 

Quanta (Independent OL User Group) 
Rainbow Repairs 

0904 768853 

QL Repairs 

Zedem Computers Ltd 

0234 213032 

QL Repairs 


This month Instant Access 
has been updated to provide 
a comprehensive guide to 
software, hardware and 
services available for your QL. 

From next month it will be 
replaced by a more detailed 
guide to QL products and 
services. In this way we hope 
to keep readers even better 
informed of what products 
are available and who 
supplies them. 


pnem -jele) 4 
THIS SPACE 
CALL 


TRUDI EVANS 
ON 
01-222-9090 


ICRO ADS __ 


a ee ae a ae ae a 
COMPUTER CLEANERS 
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STOP LOCK- UPS AND DATA CORRUPTION 


If this is due to mains interference then our plugs may be the answer 
As well as cutting high voltage spikes they smooth the cut spikes and filter 
RF interference from 1 to 30 MHZ (better than 30db) and up to 130 MHz. 
Some customer comments: 
“With the cleaner ... (locking up) ... is no problem now” — Electrical engineer. 

.. these computer cleaners work” — Computer user group. 

. the device is the answer ... (loading problems)” — BBC owner. 
tees are cured” — Golf Club QL. 


ADAPTOR -— 1 three pin socket 
ADAPTOR - 2 three pin sockets 
TRAILING 4-WAY SOCKET 


Simply plug in — no wiring required. 
TONY FIRSHMAN SERVICES 
43 Rhyl Street, London NW5 3HB. 01-267 3887 


QU UJ A N } A 66% OFF RIBBONS 


Why pay £££s for a new fabric ribbon 
cassette when we can re-ink your old one 

The fis Welapendan dant OL & users rs group 
* monthly newsletter (36/40 pages) 


at A THIRD OF THE PRICE? 
Post cassette, stating printer make and 
* free advice * tutors (Archive etc.) model and enclosing one third of the price 
* supports for local groups 
* printer hotline 


(minimum £1), to: 
Further details from Brian Pain, 24 Oxford St, Stony Strat- ALADDINK, (Dept. QL), 4 Hurkur Crescent, 
ford, Mitton Keynes, MK11 1JU Tel: (0908) 564271 


Eyemouth, Berwickshire, TD14 5AP. 


£14 inclusive 
£18 inclusive 
£24 inclusive 














* workshops 






PROFESSIONAL PROGRAMS FOR BUSINESS USERS OF 


SINCLAIR QL 

PROJECT MANAGEMENT PROGRAM - Critical Path Method based program providing the User Project 
Management Tools for Time Study, Cost Study, Project Feasibility, Cash Flow, Profit/Loss Evaluation, Bar 
Chart, Manpower Utilisation, Progress Payment Computations. 
3D SPACE TRUSSES - Statical Analysis Program computing Member Forces, Support Reactions, Deflections 
under Multiple Loadings, Superpositions of Loadings to evaluate unfavourable loading conditions. 
2D RIGID FRAMES or TRUSSES - Statical Analysis Program computing the same magnitudes as for 3D 
but for 2D Frames of flexural Members or for 2D Trusses. 

Please write for free information: 


SOFTWARE Atelier, POB 148, 80002 Karakoy, Istanbul — TURKEY 





SHADOW GAMES 





Our comprehensive Bale of top-selling games are available through 
the post or from selected stockists. At £12.95 each: AREA RAD 
CONTROLLER, SPACE PARANOIDS, NIGHT NURSE, BLAST BUGGY, 
QUAZIMODO. At £14.95, the ame, action-packed: STAR 
GUARD and GALACTIC INVADERS. At £14.95, for a limited time 
only, the incomparable: PAINT MASTER. 

New titles will soon be announced. WATCH THIS SPACE! 


Good programmers are sro in demand. Let us publish your game 
or utility. Write for details. 


SHADOW GAMES, 1/2 The Cottages, 
Maidenhatch, Tidmarsh, nr Reading, 





1. CSCREEN: The original library of 


58 





@ DRAFT DOT MATRIX 

@ NEAR LETTER QUALITY 

® SUBSCRIPT SUPERSCRIPT 

@ CONDENSE EMPHASIZE 

@96 CHAR+48 EURO+16 MATHS 
® EPSON/IBM GRAPHICS 


QL ‘C’ PROGRAMMERS 


Libraries for use with raping: s Meepogscin ‘C' compiler. 


DATE/PAPERUINK/STAIP/SAVESCRUESTSCA/WINDOW/BLOCK/PANISCROLL. ete 


2.BIGLIB: Containing all the routines of CSCREEN but totally rewritten to be faster er smatier 
PLUS: CIRCLE/LINE/POINT/SCALE/ARC/FILL/MODE/BEEP/FLASH/MYPRIORITY/ all in 1.5k. 
Yes thats less than the 1.7k of CSCREEN! 


PRICES CSCREEN £10.00, BIGLIB £20.00 
All supplied on UNPROTECTED Microdrive kcart/3.5in. disk (DS/DD) with full easy to use documentation. 
Note: BIGLIB is available as an update to buyers of CSCREEN at £12.00 + Blank Cartridge. 
All Orders: Add £2.50 if required on 3.5in. disc. Add 2.00 for Overseas Air Mail. 
N. Alexander 


22 enon Road, Margate, Kent, CT9 5AT. 
All Cheques/P. O's Payable to N. Alexander 





bikes 


ANON AS Ae eeeS |W 
DEFAULT DIRE ECTORIES ie 
SPOOLER, PRO 

KEYS SAN at JOB CONTROL. 
FONTS, MULTITASKING CLOCK etc. etc. 
OVER 120 EXTENSIONS TO BASIC, 
100% MACHIN 95. 
































ROCK HALL LIMITED 
128 STATION RD, GLENFIELD. 
LEICESTER LE3 8BR. 


TEL:0533 313531. 
TELEX: 341100. 


eee cre Sar ee 











id worldwide repre 
















NUMBER ONE FOR QL REPAIRS 
FIRST STOP PAST THE END OF YOUR TETHER! 

Do your microdrives spin on forever? 
Does your keyboard ignore you? 
Then call Rainbow Digital Repairs for 
prompt, professional service. 
Prices range from £17.00 for a keyboard 
problem; to a maximum of £37.50 for 
some microdrive problems. 
All prices include VAT, Postage and 
packaging & insurance. 


Clark House, Haxby 
York, YO3 8HU 

Tel: (0904) 768853 
24 hour answer service 


24hr courier return 
service available. 
Overseas enquiries welcomed. 


QL STOCKMARKET INVESTOR 


A powerful aid to personal investment analysis 
*CALCULATES COMMISSIONS, END-COSTS, PROFITS, IDENTIFIES LOSSES. 
*TRADITIONAL AND TRADED OPTIONS. ACCOUNT TRADING. 

*DATABASE STORAGE OF PORTFOLIO HISTORIES — EASILY UPDATED. 
*ALLOWS IMMEDIATE ANALYSIS OF PORTFOLIO PERFORMANCE. MENU DRIVEN. 
Available only for the QL at £19.95 including instructions and p&p. 


QL SPRITE ANIMATOR 


A utility to create moving and animated sprites 
*ENTIRELY IN ASSEMBLER, PRODUCING THE SMOOTHEST SCREEN MOVEMENTS. 
*EASILY USED AND CONTROLLED FROM ORDINARY SUPERBASIC COMMANDS. 
*UP TO 64 ‘FRAMES’ CAN BE STORED AND PLAYED OVER FOR ANIMATION. 

Provided with instructions and example programs at £9.95 inc. p&p. 


MAURICE COMPUTERS, Brookside, S. Kilvington, Thirsk, N. Yorks. YO7 2NL 






















QL POOSWINNER VERSION 2.0 
HE ULTIMATE POOLS PREDICTION PROGRAM 
TABASE Scrap is 


ARCHIVE NOT FAST ENOUGH 
NOT ENOUGH CAPACITY? 


Using the C programming language and BTree techniques | 
can convert your Archive applications into stand-alone pro- 
grams that run much faster, with virtually no limitation on 
the number of records (files up to the size of the storage 
medium). 
Demonstration programs available on disk or Microdrive. 


L. F. HELLER, 
65 Flanders Mansions, Flanders Road 
London W4 1NF Tel: 01 994 7976 


All English and Scottish team names are included. 
* FORECASTS score ebay frgpcledevges Nat bere din Sago 
and faster than version 1.0 — mark your coupon direct from scree! 
* SUCCESSFUL We guarantee that POOLWINNER eros conmiderath better 
than chance. If you can prove otherwise we shall refund. 
S Se te at eT ee EE oe te cee, 
with present and past results — but no tedious typing. We have yet to see 









These are friendly, 





re eae a ind professional database management systems using the Psion Run 
Time Module for Archive file compatability and machine code for speed 


C ARDFILE Personal, company and mail addresses with a general notes section. 
128K QL (44 fields)€14.95: 256K QL (44/18/8 fields) £19.95 
MAILFILE General details, mailing address and over 900 characters of notes. 
LIBRARIAN Far too many features for one line of explanation! Please call. 
128K QL (25 fields)€19.95: 256K QL (25/14/8/4 fields) £24.95 
Please include your QL’s specification on your Mail Order or with your SAE for details. 
ARK DISTRIBUTION, 62 MANOR WAY, NORTH HARROW, MIDDX HA2 GBY (01-863 1861) 


OPD/QL FILE 
INTERCHANGE 


Give your QL the capability of reading and 
writing files on microdrive cartridges that RING 0234-213032 
are in the format used by the ICL OPD (and * Ay 3-4 day turnaround 
the Merlin TONTO. Transfer XCHANGE and * 6 month warranty 
SuperBasic files between the OPD and QL. * Free telephone diagnostic service 
Available for £15 inc. P&P from: ZEDEM COMPUTERS LTD 
D. J. WALKER, 22 Kimptons Mead, 2 Kimbolton Road 
Potters Bar, Herts EN6 3HZ Bedford MK40 2NR 
or send SAE for full details. (Trade and overseas enquiries welcome) 










128K QL (25 fields)€14.95: 256K QL (25/21/8 fields) £19.95 






PROFESSIONAL REPAIRS 


Home Micro Service Ce 


Sinclair QL Repair 
16K to 48K Upgrade 


Your Complete Sinclair Stockist 


Hardware, Software, Peripherals, 
Printers, Books, Magazines, Accessories 


P.O. Box 5607 e Glendale, AZ 85312-5607 U.S.A. 
1-602-978-2902 e Telex (via WUI): 6501267701 
DEALER INQUIRIES WELCOME 


QL REVISOR £14.50 QL 
STUDENTS, BUSINESSMEN, TEACHERS, TRIVIAL PURSUERS 
Create your own personal set of revision files, fine-tuned to your requirements. Everybody knows how tedious it can be revising for 
exams, learning essays, or that important speech. Revisor enables you to group together all the relevant facts and review them 
regularly without having to plough through the pages of a text book or hastily scribbled notes. 

Pages can be created in the following formats:- 

A block of text: a single keypress blanks sections of the screen, another restores the text (line by line, in sections, or completely) 
until you are sure you have memorised it. 

Multiple Choice Questions: select the answer from up to five choices, the QL tells you if correct. Option to store explanation of 
answer. it may be obvious when you type it in but not so obvious days before the exam. The order of answers to each question can 
be jumbled for each viewing, ensuring you really know the answer. ideal for past exam papers. 

Questions/single answers: After displaying questions a single keypress reveals the answer with optional explanation. 

Questions and text can be intermixed and pages can be viewed in order or at random. Quick and easy editing with on-screen 
instructions at every stage. Files can be saved/loaded to any device, merged with existing text, exported to Quill and can be linked so 
that auto-run one after the other. A design command (like Quill) alters windows, character size etc. 

Menu driven 100% multi-tasking machine code. 


Please send cheque or postal order payable to: 


DIGITRIX 
Wishingtons, Porkellis, Helston, Cornwall. TR13 OLB 
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Hugelstrabe 10-1248Bielefeld1 West German 


Tel 0521/890381 Telex 932 974 budde d 
GIGA Soft Mouse Set ___.. Ciler- Mesto) sm@lstolelale meme) Jalal 










The Giga Soft Mouse comes in a ready-to-use package 
including a very high quality mouse, an interface for the 
joystick port of the QL and a software package. 



















Features: 3-channel AY 3 8910 Sound IC with lots of 
sound commands. Includes Interrupt-Sound-Queues 
with up to 4k of. sound information per channel, 
envelope control, noise control etc. 

Supports a Centronics-compatible parallel printer 
port. (device name PAR_). You can chose between 
unbuffered output (very fast) or buffered (buffer size 
selectable up to 32K, interrupt driven, prints even 
when microdrives are running — immediate response 
to STOP however). Suite and Supercharge: 







The software consists of the following programs: 


Giga — Basic 
(Tested in QL User 1/86 p-58) 
(Tested in Sinclair User 6/86) 


A totally new type of Basic extension for the SINCLAIR QL. It adds more than 70 
new commands to SuperBasic. Features: 
































» Full mousecontrol from Superbasic » Programmable function keys : F 
» Easily programmable MACINTOLSHstyle » User friendly full screen text editor Price £69.95 from D.P.* inc. VAT & P. & P. 
pulldown menus with 20 functions O 8) j i j 
» Very sophisticated sprit animation » Commands to program real windows OR DM200 + 15 o VAT (+10 Yo airmail Pp ost if 
commands with automatic reference of required) 
»Fully supercharge compatible background 





Ciel Oia colant= 


E. A. S. E. 


The new MACINTOSH style desktop 
Easily Applicable System Environment 

















Pull down menus 


Peace 





















» E.A.S.E. is completely mousedriven. aS Sree Icon driven. 

» E.A.S.E. supports real pulldownmenus. »€E.A.S.E. gives you fill |/O control, all RS si oS 

» E.A.S.E. can work with up to 7 real functions can easily be accessed by ; ee Cu rSOr controlled 
windows. , using the mouse » Mouse controlled 

» E.A.S.E. has an inbuilt scientific calculator » E.A.S.E. windows can be scrolled Q 

Price (complete mouse + Giga Basic + and moved accross the screen. The . Hand les Up toa 

E.A.S.E.) £89.95 from D.P.*inc VAT &P.&P. the size ofawindow canbe if complete A4 page. 

OR DM 250 + 15% VAT (plus 10% airmail changed by using the mouse. oa bees 4 


post if required. 





























Austria Firma Zupan GmbH, Mandelstrabe 23 
ABO10 Graz 
Belgium Wim de Bont, Opdorstraat 37 

B 2910 Malderen-Longerzell 








Price 
DM100 + 15% VAT (plus 10% airmail post 
if required) 






























France Bonnefoy Elektronic Other features: 
7 Rue dela Republique *& Undo, *%& Character % Designers 
F 26300 Bourg de Peage ee Editor, % Extensive Block-handlingy 
con functions: 
ae fee eee Hee faode Pencil, Rubber, Gum, Paint Brush, Paint-Roller, Spray Tin, 
Island 02840 Text, Lines, Boxes, Circles, Triangles, Ellipses and Lenses. 
Italy Spem DI Masoero Gudlo The program needs at least 128K RAM-expansion. 





Free with Giga-chrome Spectrum-to-QL screen converter 
available on cartridge and on 31%" disk 


NEW GIGA SOFT KEYBOARD 


AVAILABLE NOW!! 
PLEASE WRITE OR CALL FOR FURTHER DETAILS 


Via Ponchielll 26c, 110100 Torino 

Dr. A. Tamburello Distaco SRL 

Via Poggio Moiano 34/c 1 00199 Roma 
U.K. Digital Precision, 220 The Avenue 
London E4 9SE 













Send YOUR ORDER to: ABC Elektronic Hiigelstrabe 10-12 4800 Bielefeld 1 West Germany 
“or in the U.K. to Digital Precision, 222 The Avenue, London E4 9SE Tel: 01-527-5493 


NAME: 
ADDRESS: 





POSTCODE: 
COUNTRY: 








Tick as Cash on delivery only in 
| enclose cheque/PO payable to ABC ze Digital Precision appropriate Europe (not se n U.K.) 


PYRAMIDE 


PYRAMIDE 
SOFTWARE 


nies VROOM = £14.95 PRESENTS : OTHELLO £14.95 AL-Peintre combines the best of all worlds: 
teil A new challenging car race for the QL ICON DRIVEN — for fast selection of main options; 


with fast colour graphics and real racing Beautiful 3-D representation of the board. HELP WINDOW — on-screen instructions at every stage. 
: ite| 9 levels of play. Your Move! Watch out... 
circuits! You would be hard pushed to find a - 


Another HIT for Pyramide BETTER VERSION of Othello ON ANY MICRO. S 
Vi 


* Sinclair User — July 1986° * Sinclair QL WORLD — July 1986° 
Zone fill Circle/Ellipse 
For the first time, a ‘ ide is . 
certainly another 
game which uses notch up for QL software | f eae au RRSS SSG EGR be 
the full power of the = andan excellent start for | | Pins aoa Bs sree Aerosol dt haiapes 
cae i MORTVILLE MANOR £19.95 oe = Eicasiaanant ; 


animation. The 29 March — 2nd April, 1986 , 


object will leap out Sinclair User Classic & r i Beginyour investigation in 
Grine serge sae f §=6. a setting consisting of 
more than 85 full colour 
screens. The greatest 


£19.95 | | 1) NGS Coes danger of Mortville is its 
deadly charm; a house rege ee: z : 
‘calm’ in the eye of the ay yee a aa for the Ol! 
storm. The firstrealgraphic | 4 giainalios 
adventure for the QL! 


The best value-for-money graphics package 


Supplied on two 
Microdrives. 


NUCLEON — A UTILITY PACKAGE WITH DRAWING, MUSIC, WINDOW, 
ICON, TEXT £19.95 


PYRAMIDE ORDER FORM 
[_] WANDERER £19.95 [_] MORTVILLEMANOR £19.95 
[_] VROOM £14.95 [ | QLPEINTRE £14.95 


[_] NUCLEON £19.95 [_] OTHELLO £14.95 


A valuable “Programming Assistant”! 

This software comprises a suite of programs and tools (on two microdrives), designed 
to reduce the labour involved in producing professional results in your own creations. 
The four main programs all generage AUTOMATICALLY their own SuperBasic programs. 


¢, Compact Draw = Superb drawings, created and edited on screen. When you have | 
*, finished, a SuperBasic program is generated, that will re-draw thepicture! Includes all l 
the features you would expect from a professional design package. l 
| 
| 
| 
| 
| 
| 
| 
| 
‘a 


Font Definer —A very easy-to-use font definer, that allows you to design all types of new 
character sets for the QL. 

Windows — A utility that will give your programs a smart professional look, by custom 
designing your screen-display. Create and adjust windows on-screen, anywhere, any 
size, any colours, shadows, borders, etc.! This program is icon-driven for ease of use. 


Maestro — Want to give your programs a little more musical appeal? Finding the 
unpredictably tricky BEEP command more trouble than it’s worth? Maestro could be the 
answer. Features a two octave pitch range, icon-driven composition, notes displayed 
on standard musical staves, functions of insertion, deletion, etc. 


NAME: 
ADDRESS 


AVAILABLE BY MAIL ORDER. ENCLOSE CHEQUE/P.O. MADE PAYABLE TO: 
RIO PROMOTIONS LTD. Dept QL, 28 Waverley Grove, London N3 NPX. Tel: 01-349 2764 
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